| File |
Line number |
Procedure |
Code |
|
./pkg/offline/offline_fields_load.F |
117 |
OFFLINE_FIELDS_LOAD |
intime1= 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/offline/offline_fields_load.F |
136 |
OFFLINE_FIELDS_LOAD |
& intime0, intime1, myIter, myTime |
|
./pkg/offline/offline_fields_load.F |
151 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
163 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
174 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
185 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
196 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
207 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
219 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
230 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
241 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
253 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
264 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
275 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
287 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
300 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
|
./pkg/offline/offline_fields_load.F |
66 |
OFFLINE_FIELDS_LOAD |
INTEGER bi,bj,i,j,k,intime0,intime1 |
|
./pkg/rbcs/rbcs_fields_load.F |
119 |
RBCS_FIELDS_LOAD |
intime1 = intime0 + 1 |
|
./pkg/rbcs/rbcs_fields_load.F |
122 |
RBCS_FIELDS_LOAD |
intime1 = F90MODULO(intime1,nForcingPeriods) |
|
./pkg/rbcs/rbcs_fields_load.F |
125 |
RBCS_FIELDS_LOAD |
intime1 = 1 + intime1 |
|
./pkg/rbcs/rbcs_fields_load.F |
134 |
RBCS_FIELDS_LOAD |
intime1 = 1 |
|
./pkg/rbcs/rbcs_fields_load.F |
144 |
RBCS_FIELDS_LOAD |
initer1 = rbcsIter0 + intime1*Ifprd |
|
./pkg/rbcs/rbcs_fields_load.F |
156 |
RBCS_FIELDS_LOAD |
& intime0, intime1, myIter, myTime |
|
./pkg/rbcs/rbcs_fields_load.F |
168 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxTFile,rbct1,intime1,myIter,myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
180 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxSFile,rbcs1,intime1,myIter,myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
207 |
RBCS_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
55 |
RBCS_FIELDS_LOAD |
INTEGER bi,bj,i,j,k,intime0,intime1 |
|
./model/src/external_fields_load.F |
102 |
EXTERNAL_FIELDS_LOAD |
& intime0, intime1, myIter, myTime |
|
./model/src/external_fields_load.F |
109 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
115 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
121 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
126 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
132 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
151 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
157 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
163 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
170 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
191 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
|
./model/src/external_fields_load.F |
312 |
EXTERNAL_FIELDS_LOAD |
& intime0,intime1,aWght,bWght |
|
./model/src/external_fields_load.F |
60 |
EXTERNAL_FIELDS_LOAD |
INTEGER bi,bj,i,j,intime0,intime1 |
|
./model/src/external_fields_load.F |
81 |
EXTERNAL_FIELDS_LOAD |
intime1 = 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/atm2d/atm2ocn_main.F |
37 |
ATM2OCN_MAIN |
INTEGER intime0,intime1 |
|
./pkg/atm2d/atm2ocn_main.F |
45 |
ATM2OCN_MAIN |
& intime0, intime1, ifTime, myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
52 |
ATM2OCN_MAIN |
& intime0, intime1, myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
58 |
ATM2OCN_MAIN |
& intime0,intime1,ifTime,myIter,myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
61 |
ATM2OCN_MAIN |
& intime0,intime1,ifTime,myIter,myThid) |
|
./pkg/atm2d/calc_fileload.F |
39 |
CALC_FILELOAD |
INTEGER intime1 |
|
./pkg/atm2d/calc_fileload.F |
67 |
CALC_FILELOAD |
& intime1=mn |
|
./pkg/atm2d/calc_fileload.F |
74 |
CALC_FILELOAD |
intime0=intime1-1 |
|
./pkg/atm2d/calc_fileload.F |
76 |
CALC_FILELOAD |
& (dmonth(intime1) - dmonth(intime0)) |
|
./pkg/atm2d/calc_fileload.F |
83 |
CALC_FILELOAD |
IF (intime1.EQ.13) intime1=1 |
|
./pkg/atm2d/calc_fileload.F |
9 |
CALC_FILELOAD |
& intime0, intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
104 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( precipFile,precip1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
110 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( runoffFile,runoff1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
34 |
FIXED_FLUX_ADD |
INTEGER intime1 |
|
./pkg/atm2d/fixed_flux_add.F |
74 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( tauuFile,tau1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
80 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( tauvFile,tav1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
86 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( windFile,wind1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
92 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( qnetFile,qnet1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
98 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( evapFile,evap1,intime1, |
|
./pkg/atm2d/fixed_flux_add.F |
9 |
FIXED_FLUX_ADD |
& intime0, intime1, iftime, myIter, myThid) |
|
./pkg/atm2d/relax_add.F |
38 |
RELAX_ADD |
INTEGER intime1 |
|
./pkg/atm2d/relax_add.F |
68 |
RELAX_ADD |
CALL READ_REC_XY_RS( thetaRelaxFile,sst1,intime1, |
|
./pkg/atm2d/relax_add.F |
74 |
RELAX_ADD |
CALL READ_REC_XY_RS( saltRelaxFile,sss1,intime1, |
|
./pkg/atm2d/relax_add.F |
9 |
RELAX_ADD |
& intime0, intime1, iftime, myIter, myThid) |
|
./pkg/atm2d/subtract_means.F |
27 |
SUBTRACT_MEANS |
INTEGER intime1 |
|
./pkg/atm2d/subtract_means.F |
37 |
SUBTRACT_MEANS |
& (wght0*atau(j_atm,intime0) + wght1*atau(j_atm,intime1)) |
|
./pkg/atm2d/subtract_means.F |
39 |
SUBTRACT_MEANS |
& (wght0*atav(j_atm,intime0) + wght1*atav(j_atm,intime1)) |
|
./pkg/atm2d/subtract_means.F |
41 |
SUBTRACT_MEANS |
& (wght0*awind(j_atm,intime0) + wght1*awind(j_atm,intime1)) |
|
./pkg/atm2d/subtract_means.F |
9 |
SUBTRACT_MEANS |
& intime0, intime1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
119 |
BULKF_FIELDS_LOAD |
INTEGER bi,bj,i,j,intime0,intime1 |
|
./pkg/bulk_force/bulkf_fields_load.F |
178 |
BULKF_FIELDS_LOAD |
intime1= 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/bulk_force/bulkf_fields_load.F |
197 |
BULKF_FIELDS_LOAD |
& intime0, intime1, myIter, myTime |
|
./pkg/bulk_force/bulkf_fields_load.F |
203 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( AirTempFile,tair1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
209 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( AirhumidityFile,qair1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
215 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( SolarFile,solar1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
221 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( LongwaveFile,flwdwn1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
227 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( CloudFile,cloud1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
234 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( WSpeedFile,wspeed1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
240 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( UWindFile,uwind1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
246 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( VWindFile,vwind1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
253 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( RainFile,rain1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
259 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( RunoffFile,runoff1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
265 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( SnowFile,snow1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
273 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( airPotTempFile, thAir1, intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
281 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( QnetFile,qnetch1,intime1, |
|
./pkg/bulk_force/bulkf_fields_load.F |
287 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( EmpFile,empch1,intime1, |
|
./pkg/cfc/cfc_fields_load.F |
103 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_iceFile,ice1,intime1, |
|
./pkg/cfc/cfc_fields_load.F |
35 |
CFC_FIELDS_LOAD |
INTEGER bi,bj,i,j,intime0,intime1 |
|
./pkg/cfc/cfc_fields_load.F |
65 |
CFC_FIELDS_LOAD |
intime1= 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/cfc/cfc_fields_load.F |
91 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_windFile,wind1,intime1, |
|
./pkg/cfc/cfc_fields_load.F |
97 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_atmospFile,atmosp1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
209 |
CHEAPAML_FIELDS_LOAD |
intime1=mod(intime0+1,nForcingPeriods) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
215 |
CHEAPAML_FIELDS_LOAD |
intime1=intime1+1 |
|
./pkg/cheapaml/cheapaml_fields_load.F |
229 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RS( SolarFile,solar1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
235 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RS( TRFile,trair1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
241 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RS( QrFile,qrair1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
247 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RS( UWindFile,uwind1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
253 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RS( VWindFile,vwind1,intime1, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
78 |
CHEAPAML_FIELDS_LOAD |
INTEGER bi,bj,i,j,intime0,intime1 |
|
./pkg/dic/dic_fields_load.F |
102 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |
|
./pkg/dic/dic_fields_load.F |
108 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_iceFile,ice1,intime1, |
|
./pkg/dic/dic_fields_load.F |
115 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( Filename1,par1,intime1, |
|
./pkg/dic/dic_fields_load.F |
123 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_ironFile,feinput1,intime1, |
|
./pkg/dic/dic_fields_load.F |
42 |
DIC_FIELDS_LOAD |
INTEGER bi,bj,i,j,intime0,intime1 |
|
./pkg/dic/dic_fields_load.F |
63 |
DIC_FIELDS_LOAD |
intime1 = 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/dic/dic_fields_load.F |
83 |
DIC_FIELDS_LOAD |
& intime0, intime1, myIter, myTime |
|
./pkg/dic/dic_fields_load.F |
90 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_windFile,dicwind1,intime1, |
|
./pkg/dic/dic_fields_load.F |
96 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_atmospFile,atmosp1,intime1, |
|
./pkg/dic/dic_surfforcing_init.F |
39 |
DIC_SURFFORCING_INIT |
INTEGER intime0,intime1 |
|
./pkg/dic/dic_surfforcing_init.F |
76 |
DIC_SURFFORCING_INIT |
intime1 = 1 + MOD(intime0,nForcingPeriods) |
|
./pkg/dic/dic_surfforcing_init.F |
87 |
DIC_SURFFORCING_INIT |
& intime0, intime1 |
|
./pkg/dic/dic_surfforcing_init.F |
93 |
DIC_SURFFORCING_INIT |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |