File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_get_forcing.F |
137 |
SEAICE_GET_FORCING |
iRec = int((YearTime-WindForcingStart)/WindForcingPeriod) + 1 |
./pkg/seaice/seaice_get_forcing.F |
151 |
SEAICE_GET_FORCING |
iRec = int((YearTime-FluxForcingStart)/FluxForcingPeriod) + 1 |
./pkg/seaice/seaice_get_forcing.F |
195 |
SEAICE_GET_FORCING |
iRec = int((YearTime-SSTforcingStart)/SSTforcingPeriod) + 1 |
./pkg/seaice/seaice_get_forcing.F |
203 |
SEAICE_GET_FORCING |
iRec = int((YearTime-SSSforcingStart)/SSSforcingPeriod) + 1 |
./pkg/seaice/seaice_get_forcing.F |
235 |
SEAICE_GET_FORCING |
iRec = int((YearTime-WindForcingStart)/WindForcingPeriod) + 2 |
./pkg/seaice/seaice_get_forcing.F |
236 |
SEAICE_GET_FORCING |
aWghtWind = mod(YearTime-WindForcingStart,WindForcingPeriod) / |
./pkg/seaice/seaice_get_forcing.F |
272 |
SEAICE_GET_FORCING |
iRec = int((YearTime-FluxForcingStart)/FluxForcingPeriod) + 2 |
./pkg/seaice/seaice_get_forcing.F |
273 |
SEAICE_GET_FORCING |
aWghtFlux = mod(YearTime-FluxForcingStart,FluxForcingPeriod) / |
./pkg/seaice/seaice_get_forcing.F |
366 |
SEAICE_GET_FORCING |
iRec = int((YearTime-SSTforcingStart)/SSTforcingPeriod) + 2 |
./pkg/seaice/seaice_get_forcing.F |
367 |
SEAICE_GET_FORCING |
aWghtSST = mod(YearTime-SSTforcingStart,SSTforcingPeriod) / |
./pkg/seaice/seaice_get_forcing.F |
391 |
SEAICE_GET_FORCING |
iRec = int((YearTime-SSSforcingStart)/SSSforcingPeriod) + 2 |
./pkg/seaice/seaice_get_forcing.F |
392 |
SEAICE_GET_FORCING |
aWghtSSS = mod(YearTime-SSSforcingStart,SSSforcingPeriod) / |
./pkg/seaice/seaice_get_forcing.F |
50 |
SEAICE_GET_FORCING |
_RL year, seconds, YearTime, four |
./pkg/seaice/seaice_get_forcing.F |
57 |
SEAICE_GET_FORCING |
YearTime = myTime |
./pkg/seaice/seaice_get_forcing.F |
66 |
SEAICE_GET_FORCING |
if( YearTime-seconds .ge. 0. ) then |
./pkg/seaice/seaice_get_forcing.F |
67 |
SEAICE_GET_FORCING |
YearTime = YearTime-seconds |
./pkg/seaice/seaice_get_forcing.F |
82 |
SEAICE_GET_FORCING |
& YearTime .lt. WindForcingStart .or. |
./pkg/seaice/seaice_get_forcing.F |
83 |
SEAICE_GET_FORCING |
& YearTime .gt. WindForcingEnd .or. |
./pkg/seaice/seaice_get_forcing.F |
84 |
SEAICE_GET_FORCING |
& YearTime .lt. FluxForcingStart .or. |
./pkg/seaice/seaice_get_forcing.F |
85 |
SEAICE_GET_FORCING |
& YearTime .gt. FluxForcingEnd .or. |
./pkg/seaice/seaice_get_forcing.F |
86 |
SEAICE_GET_FORCING |
& YearTime .lt. SSTforcingStart .or. |
./pkg/seaice/seaice_get_forcing.F |
87 |
SEAICE_GET_FORCING |
& YearTime .gt. SSTforcingEnd .or. |
./pkg/seaice/seaice_get_forcing.F |
88 |
SEAICE_GET_FORCING |
& YearTime .lt. SSSforcingStart .or. |
./pkg/seaice/seaice_get_forcing.F |
89 |
SEAICE_GET_FORCING |
& YearTime .gt. SSSforcingEnd ) THEN |