35 |
c included runoff D. Stammer, Nov. 25, 2001 |
c included runoff D. Stammer, Nov. 25, 2001 |
36 |
c included pressure forcing. heimbach@mit.edu 05-Nov-2002 |
c included pressure forcing. heimbach@mit.edu 05-Nov-2002 |
37 |
c |
c |
38 |
|
c added "repeatPeriod" for cycling of forcing datasets 19-Dec-2002 |
39 |
c ================================================================== |
c ================================================================== |
40 |
c SUBROUTINE exf_readparms |
c SUBROUTINE exf_readparms |
41 |
c ================================================================== |
c ================================================================== |
68 |
|
|
69 |
c Surface flux data. |
c Surface flux data. |
70 |
namelist /exf_nml/ |
namelist /exf_nml/ |
71 |
|
& repeatPeriod, |
72 |
& hfluxstartdate1, hfluxstartdate2, hfluxperiod, |
& hfluxstartdate1, hfluxstartdate2, hfluxperiod, |
73 |
& atempstartdate1, atempstartdate2, atempperiod, |
& atempstartdate1, atempstartdate2, atempperiod, |
74 |
& aqhstartdate1, aqhstartdate2, aqhperiod, |
& aqhstartdate1, aqhstartdate2, aqhperiod, |
169 |
apressurestartdate2 = 0 |
apressurestartdate2 = 0 |
170 |
apressureperiod = 0.0 _d 0 |
apressureperiod = 0.0 _d 0 |
171 |
|
|
172 |
|
repeatPeriod = 0.0 _d 0 |
173 |
|
|
174 |
|
|
175 |
c Data files. |
c Data files. |
176 |
hfluxfile = ' ' |
hfluxfile = ' ' |
177 |
atempfile = ' ' |
atempfile = ' ' |