module Mod_SISVAT_aux !--------------------------------------------------------------------------+ ! module Mod_SISVAT_aux Fri 2-Feb-2013 MAR | ! module Mod_SISVAT_aux contains specific variables (and constants) | ! used by Soil/Ice Snow Vegetation Atmosphere Transfer Scheme | ! | !--------------------------------------------------------------------------+ ! General Variables ! ================= use Mod_Real use Mod_SISVAT_dim IMPLICIT NONE ! SISVAT .main. specific variables (and constants) ! ================================================ character(len= 1) :: SepLab ! OUTPUT ASCII File Labels character(len= 6) :: FilLab ! integer, SAVE :: nwUNIT ! OUTPUT File Unit Number (New) ! Energy and Mass Budget ! ~~~~~~~~~~~~~~~~~~~~~~ ! #e1 integer, SAVE :: noEBal ! Energy Imbalances Counter ! H2O Conservation ! #m0 integer, SAVE :: noWBal ! Water Imbalances Counter ! * Mass Conservation ! #m1 integer, SAVE :: noSBal ! Water Imbalances Counter end module Mod_SISVAT_aux