File |
Line number |
Procedure |
Code |
./pkg/exf/exf_getffieldrec.F |
225 |
EXF_GETFFIELDREC |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/exf/exf_getffieldrec.F |
234 |
EXF_GETFFIELDREC |
count1 = intime1 |
./pkg/exf/exf_getffieldrec.F |
248 |
EXF_GETFFIELDREC |
& intimeP, ', intime0=', intime0, ', intime1=', intime1 |
./pkg/exf/exf_getffieldrec.F |
88 |
EXF_GETFFIELDREC |
INTEGER intimeP, intime0, intime1 |
./pkg/offline/offline_fields_load.F |
104 |
OFFLINE_FIELDS_LOAD |
& intime0,intime1, ' ; Wght=', bWght, aWght |
./pkg/offline/offline_fields_load.F |
119 |
OFFLINE_FIELDS_LOAD |
IF ( intime1.NE.offlineLdRec(bi,bj) ) THEN |
./pkg/offline/offline_fields_load.F |
136 |
OFFLINE_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/offline/offline_fields_load.F |
157 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
168 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
183 |
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 |
209 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
223 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
233 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
248 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
262 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
276 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
291 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
320 |
OFFLINE_FIELDS_LOAD |
& intime1*Ifprd +offlineIter0 |
./pkg/offline/offline_fields_load.F |
344 |
OFFLINE_FIELDS_LOAD |
offlineLdRec(bi,bj) = intime1 |
./pkg/offline/offline_fields_load.F |
74 |
OFFLINE_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/offline/offline_fields_load.F |
92 |
OFFLINE_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/offline/offline_get_diffus.F |
59 |
OFFLINE_GET_DIFFUS |
INTEGER intimeP, intime0, intime1 |
./pkg/offline/offline_get_diffus.F |
69 |
OFFLINE_GET_DIFFUS |
O intimeP, intime0, intime1, bWght, aWght, |
./model/src/external_fields_load.F |
103 |
EXTERNAL_FIELDS_LOAD |
IF ( intime1.NE.loadedRec(bi,bj) ) THEN |
./model/src/external_fields_load.F |
112 |
EXTERNAL_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./model/src/external_fields_load.F |
121 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
127 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
133 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
138 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
144 |
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 |
169 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
175 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
182 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
203 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
232 |
EXTERNAL_FIELDS_LOAD |
loadedRec(bi,bj) = intime1 |
./model/src/external_fields_load.F |
62 |
EXTERNAL_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./model/src/external_fields_load.F |
73 |
EXTERNAL_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./model/src/external_fields_load.F |
84 |
EXTERNAL_FIELDS_LOAD |
& ' : iP,iLd,i0,i1=', intimeP,loadedRec(bi,bj), intime0,intime1, |
./model/src/external_fields_load.F |
97 |
EXTERNAL_FIELDS_LOAD |
IF ( intime1.NE.loadedRec(bi,bj) ) THEN |
./pkg/rbcs/rbcs_fields_load.F |
109 |
RBCS_FIELDS_LOAD |
IF ( intime1.NE.rbcsLdRec(bi,bj) ) THEN |
./pkg/rbcs/rbcs_fields_load.F |
118 |
RBCS_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/rbcs/rbcs_fields_load.F |
126 |
RBCS_FIELDS_LOAD |
initer1 = rbcsIter0 + intime1*Ifprd |
./pkg/rbcs/rbcs_fields_load.F |
138 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxUFile,rbcu1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
150 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxVFile,rbcv1,intime1,myIter,myThid) |
./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 |
182 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxSFile,rbcs1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
211 |
RBCS_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
223 |
RBCS_FIELDS_LOAD |
rbcsLdRec(bi,bj) = intime1 |
./pkg/rbcs/rbcs_fields_load.F |
56 |
RBCS_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/rbcs/rbcs_fields_load.F |
78 |
RBCS_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/rbcs/rbcs_fields_load.F |
86 |
RBCS_FIELDS_LOAD |
& ' : iP,iLd,i0,i1=', intimeP,rbcsLdRec(bi,bj), intime0,intime1, |
./pkg/rbcs/rbcs_fields_load.F |
93 |
RBCS_FIELDS_LOAD |
intime1 = 1 |
./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 |
36 |
FIXED_FLUX_ADD |
INTEGER intime1 |
./pkg/atm2d/fixed_flux_add.F |
77 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( tauuFile,tau1,intime1, |
./pkg/atm2d/fixed_flux_add.F |
83 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( tauvFile,tav1,intime1, |
./pkg/atm2d/fixed_flux_add.F |
89 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( windFile,wind1,intime1, |
./pkg/atm2d/fixed_flux_add.F |
95 |
FIXED_FLUX_ADD |
CALL READ_REC_XY_RS( qnetFile,qnet1,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/bling/bling_carbonate_init.F |
38 |
BLING_CARBONATE_INIT |
INTEGER intimeP, intime0, intime1 |
./pkg/bling/bling_carbonate_init.F |
62 |
BLING_CARBONATE_INIT |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/bling/bling_carbonate_init.F |
70 |
BLING_CARBONATE_INIT |
& ' : Reading new data, i0,i1=', intime0, intime1 |
./pkg/bling/bling_carbonate_init.F |
76 |
BLING_CARBONATE_INIT |
CALL READ_REC_XY_RS( BLING_silicaFile,silica1,intime1, |
./pkg/bling/bling_fields_load.F |
107 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_windFile,dicwind1,intime1, |
./pkg/bling/bling_fields_load.F |
113 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_atmospFile,atmosp1,intime1, |
./pkg/bling/bling_fields_load.F |
119 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_silicaFile,silica1,intime1, |
./pkg/bling/bling_fields_load.F |
125 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_iceFile,ice1,intime1, |
./pkg/bling/bling_fields_load.F |
131 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_ironFile,feinput1,intime1, |
./pkg/bling/bling_fields_load.F |
150 |
BLING_FIELDS_LOAD |
BLING_ldRec(bi,bj) = intime1 |
./pkg/bling/bling_fields_load.F |
52 |
BLING_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/bling/bling_fields_load.F |
60 |
BLING_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/bling/bling_fields_load.F |
72 |
BLING_FIELDS_LOAD |
& intime1, |
./pkg/bling/bling_fields_load.F |
88 |
BLING_FIELDS_LOAD |
IF ( intime1.NE.BLING_ldRec(bi,bj) ) THEN |
./pkg/bling/bling_fields_load.F |
97 |
BLING_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
122 |
BULKF_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/bulk_force/bulkf_fields_load.F |
173 |
BULKF_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/bulk_force/bulkf_fields_load.F |
184 |
BULKF_FIELDS_LOAD |
& ' : iP,iLd,i0,i1=', intimeP,bulkfRec(bi,bj), intime0,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
192 |
BULKF_FIELDS_LOAD |
IF ( intime1.NE.bulkfRec(bi,bj) ) THEN |
./pkg/bulk_force/bulkf_fields_load.F |
202 |
BULKF_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
210 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( AirTempFile,tair1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
216 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( AirhumidityFile,qair1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
222 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( SolarFile,solar1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
228 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( LongwaveFile,flwdwn1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
234 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( CloudFile,cloud1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
241 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( WSpeedFile,wspeed1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
247 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( UWindFile,uwind1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
253 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( VWindFile,vwind1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
260 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( RainFile,rain1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
266 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( RunoffFile,runoff1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
272 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( SnowFile,snow1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
280 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( airPotTempFile, thAir1, intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
288 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( QnetFile,qnetch1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
294 |
BULKF_FIELDS_LOAD |
CALL READ_REC_XY_RS( EmpFile,empch1,intime1, |
./pkg/bulk_force/bulkf_fields_load.F |
353 |
BULKF_FIELDS_LOAD |
bulkfRec(bi,bj) = intime1 |
./pkg/cfc/cfc11_forcing.F |
107 |
CFC11_FORCING |
& intime1, aWght, ACFCyear(iRec1) |
./pkg/cfc/cfc11_forcing.F |
71 |
CFC11_FORCING |
INTEGER intimeP, intime0, intime1, iRec0, iRec1 |
./pkg/cfc/cfc11_forcing.F |
87 |
CFC11_FORCING |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/cfc/cfc11_forcing.F |
91 |
CFC11_FORCING |
iRec1 = MAX( 1, MIN( ACFCnRec, intime1 ) ) |
./pkg/cfc/cfc12_forcing.F |
108 |
CFC12_FORCING |
& intime1, aWght, ACFCyear(iRec1) |
./pkg/cfc/cfc12_forcing.F |
72 |
CFC12_FORCING |
INTEGER intimeP, intime0, intime1, iRec0, iRec1 |
./pkg/cfc/cfc12_forcing.F |
88 |
CFC12_FORCING |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/cfc/cfc12_forcing.F |
92 |
CFC12_FORCING |
iRec1 = MAX( 1, MIN( ACFCnRec, intime1 ) ) |
./pkg/cfc/cfc_fields_load.F |
105 |
CFC_FIELDS_LOAD |
IF ( intime1.NE.CFC_ldRec(bi,bj) ) THEN |
./pkg/cfc/cfc_fields_load.F |
114 |
CFC_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/cfc/cfc_fields_load.F |
124 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_windFile,wind1,intime1, |
./pkg/cfc/cfc_fields_load.F |
130 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_atmospFile,atmosp1,intime1, |
./pkg/cfc/cfc_fields_load.F |
137 |
CFC_FIELDS_LOAD |
CALL READ_REC_XY_RS( CFC_iceFile,ice1,intime1, |
./pkg/cfc/cfc_fields_load.F |
155 |
CFC_FIELDS_LOAD |
CFC_ldRec(bi,bj) = intime1 |
./pkg/cfc/cfc_fields_load.F |
52 |
CFC_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/cfc/cfc_fields_load.F |
78 |
CFC_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/cfc/cfc_fields_load.F |
89 |
CFC_FIELDS_LOAD |
& ' : iP,iLd,i0,i1=', intimeP,CFC_ldRec(bi,bj), intime0,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
104 |
CHEAPAML_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/cheapaml/cheapaml_fields_load.F |
170 |
CHEAPAML_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/cheapaml/cheapaml_fields_load.F |
182 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( SolarFile,solar1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
200 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( TRFile,trair1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
218 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( QrFile,qrair1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
236 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( UWindFile,uWind1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
257 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( VWindFile,vWind1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
277 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( cheap_hFile,cheaph1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
283 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( cheap_clFile,cheapcl1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
289 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( cheap_dlwFile,cheaplw1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
295 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( cheap_prFile,cheappr1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
301 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( UStressFile,ustress1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
307 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( VStressFile,vstress1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
313 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( WaveHFile,wavesh1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
319 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( WavePFile,wavesp1,intime1, |
./pkg/cheapaml/cheapaml_fields_load.F |
325 |
CHEAPAML_FIELDS_LOAD |
CALL READ_REC_XY_RL( TracerRFile,CheaptracerR1,intime1, |
./pkg/dic/dic_fields_load.F |
100 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_atmospFile,atmosp1,intime1, |
./pkg/dic/dic_fields_load.F |
106 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |
./pkg/dic/dic_fields_load.F |
112 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_iceFile,ice1,intime1, |
./pkg/dic/dic_fields_load.F |
119 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_parFile,par1,intime1, |
./pkg/dic/dic_fields_load.F |
134 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_ironFile,feinput1,intime1, |
./pkg/dic/dic_fields_load.F |
163 |
DIC_FIELDS_LOAD |
DIC_ldRec(bi,bj) = intime1 |
./pkg/dic/dic_fields_load.F |
37 |
DIC_FIELDS_LOAD |
INTEGER intimeP, intime0, intime1 |
./pkg/dic/dic_fields_load.F |
48 |
DIC_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/dic/dic_fields_load.F |
59 |
DIC_FIELDS_LOAD |
& ' : iP,iLd,i0,i1=', intimeP,DIC_ldRec(bi,bj), intime0,intime1, |
./pkg/dic/dic_fields_load.F |
75 |
DIC_FIELDS_LOAD |
IF ( intime1.NE.DIC_ldRec(bi,bj) ) THEN |
./pkg/dic/dic_fields_load.F |
84 |
DIC_FIELDS_LOAD |
& ' : Reading new data, i0,i1=', intime0, intime1, |
./pkg/dic/dic_fields_load.F |
94 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_windFile,dicwind1,intime1, |
./pkg/dic/dic_surfforcing_init.F |
39 |
DIC_SURFFORCING_INIT |
INTEGER intimeP, intime0, intime1 |
./pkg/dic/dic_surfforcing_init.F |
70 |
DIC_SURFFORCING_INIT |
O intimeP, intime0, intime1, bWght, aWght, |
./pkg/dic/dic_surfforcing_init.F |
78 |
DIC_SURFFORCING_INIT |
& ' : Reading new data, i0,i1=', intime0, intime1 |
./pkg/dic/dic_surfforcing_init.F |
84 |
DIC_SURFFORCING_INIT |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |