Subroutine vom_add_daily
1754 :
1755 : !+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1756 : !+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1757 : !+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1758 :
1759 : subroutine vom_add_daily ()
1760 : use vom_vegwat_mod
1761 : implicit none
1762 :
1763 : vd_d = vd_d + vd_h(th_)
1764 : etmt_d = etmt_d + etmt_h
1765 : etmg_d = etmg_d + etmg_h
1766 : esoil_d = esoil_d + esoil_h
1767 : spgfcf_d = spgfcf_d + spgfcf_h
1768 : infx_d = infx_d + infx_h
1769 : rlt_d = rlt_d + rlt_h(2,2) * 3600.d0 ! rlt_d in mol/day
1770 : rlg_d = rlg_d + rlg_h(2,2,2) * 3600.d0
1771 :
1772 : return
1773 : end subroutine vom_add_daily