| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_surfforcing_init.F |
109 |
DIC_SURFFORCING_INIT |
& +aWght*silica1(i,j,bi,bj) |
|
./pkg/dic/dic_surfforcing_init.F |
44 |
DIC_SURFFORCING_INIT |
_RL aWght,bWght,rdt |
|
./pkg/dic/dic_surfforcing_init.F |
74 |
DIC_SURFFORCING_INIT |
aWght=float( Iftm-Ifprd*intime0 )/float( Ifprd ) |
|
./pkg/dic/dic_surfforcing_init.F |
75 |
DIC_SURFFORCING_INIT |
bWght=1.-aWght |
|
./pkg/dic/dic_fields_load.F |
145 |
DIC_FIELDS_LOAD |
& +aWght*wspeed1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
155 |
DIC_FIELDS_LOAD |
& +aWght*atmosp1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
161 |
DIC_FIELDS_LOAD |
& +aWght*silica1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
167 |
DIC_FIELDS_LOAD |
& +aWght*ice1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
177 |
DIC_FIELDS_LOAD |
& +aWght*feinput1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
45 |
DIC_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/dic/dic_fields_load.F |
66 |
DIC_FIELDS_LOAD |
aWght=float( Iftm-Ifprd*intime0 )/float( Ifprd ) |
|
./pkg/dic/dic_fields_load.F |
67 |
DIC_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/obcs/obcs_external_fields_load.F |
229 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBEu1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
231 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBEv1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
233 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBEt1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
235 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBEs1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
239 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBWu1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
241 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBWv1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
243 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBWt1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
245 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBWs1(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
251 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBNu1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
253 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBNv1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
255 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBNt1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
257 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBNs1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
261 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBSu1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
263 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBSv1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
265 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBSt1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
267 |
OBCS_EXTERNAL_FIELDS_LOAD |
& +aWght*OBSs1(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
69 |
OBCS_EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/obcs/obcs_external_fields_load.F |
85 |
OBCS_EXTERNAL_FIELDS_LOAD |
aWght=float( Iftm-Ifprd*intime0 )/float( Ifprd ) |
|
./pkg/obcs/obcs_external_fields_load.F |
86 |
OBCS_EXTERNAL_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
127 |
BULKF_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/bulk_force/bulkf_fields_load.F |
188 |
BULKF_FIELDS_LOAD |
aWght=dfloat( Iftm-Ifprd*intime0 )/dfloat( Ifprd ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
189 |
BULKF_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
375 |
BULKF_FIELDS_LOAD |
& +aWght*tair1(i,j,bi,bj) !+273.15 |
|
./pkg/bulk_force/bulkf_fields_load.F |
379 |
BULKF_FIELDS_LOAD |
& +aWght*qair1(i,j,bi,bj) ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
381 |
BULKF_FIELDS_LOAD |
& +aWght*rain1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
383 |
BULKF_FIELDS_LOAD |
& +aWght*solar1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
385 |
BULKF_FIELDS_LOAD |
& +aWght*flw1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
387 |
BULKF_FIELDS_LOAD |
& +aWght*uwind1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
389 |
BULKF_FIELDS_LOAD |
& +aWght*vwind1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
391 |
BULKF_FIELDS_LOAD |
& +aWght*runoff1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
393 |
BULKF_FIELDS_LOAD |
& +aWght*wspeed1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
395 |
BULKF_FIELDS_LOAD |
& +aWght*qnetch1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
397 |
BULKF_FIELDS_LOAD |
& +aWght*empch1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
399 |
BULKF_FIELDS_LOAD |
& +aWght*cloud1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
402 |
BULKF_FIELDS_LOAD |
& +aWght*snow1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
406 |
BULKF_FIELDS_LOAD |
& +aWght*taux1Local(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
408 |
BULKF_FIELDS_LOAD |
& +aWght*tauy1Local(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
412 |
BULKF_FIELDS_LOAD |
& +aWght*SST1Local(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
414 |
BULKF_FIELDS_LOAD |
& +aWght*SSS1Local(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
115 |
EXTERNAL_FIELDS_LOAD |
aWght = tmp1Wght / tmp2Wght |
|
./model/src/external_fields_load.F |
116 |
EXTERNAL_FIELDS_LOAD |
bWght = 1. _d 0 - aWght |
|
./model/src/external_fields_load.F |
243 |
EXTERNAL_FIELDS_LOAD |
& +aWght*SST1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
245 |
EXTERNAL_FIELDS_LOAD |
& +aWght*SSS1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
247 |
EXTERNAL_FIELDS_LOAD |
& +aWght*taux1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
249 |
EXTERNAL_FIELDS_LOAD |
& +aWght*tauy1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
251 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qnet1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
253 |
EXTERNAL_FIELDS_LOAD |
& +aWght*EmPmR1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
255 |
EXTERNAL_FIELDS_LOAD |
& + aWght*saltFlux1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
258 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qsw1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
262 |
EXTERNAL_FIELDS_LOAD |
& +aWght*pload1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
279 |
EXTERNAL_FIELDS_LOAD |
& intime0,intime1,aWght,bWght |
|
./model/src/external_fields_load.F |
284 |
EXTERNAL_FIELDS_LOAD |
& aWght,bWght |
|
./model/src/external_fields_load.F |
62 |
EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./verification/natl_box/code/external_fields_load.F |
100 |
EXTERNAL_FIELDS_LOAD |
bWght=1.-aWght |
|
./verification/natl_box/code/external_fields_load.F |
209 |
EXTERNAL_FIELDS_LOAD |
& +aWght*SST1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
211 |
EXTERNAL_FIELDS_LOAD |
& +aWght*SSS1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
213 |
EXTERNAL_FIELDS_LOAD |
& +aWght*taux1(i,j,bi,bj)) |
|
./verification/natl_box/code/external_fields_load.F |
215 |
EXTERNAL_FIELDS_LOAD |
& +aWght*tauy1(i,j,bi,bj)) |
|
./verification/natl_box/code/external_fields_load.F |
217 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qnet1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
219 |
EXTERNAL_FIELDS_LOAD |
& +aWght*EmPmR1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
222 |
EXTERNAL_FIELDS_LOAD |
& +aWght*Qsw1(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
62 |
EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./verification/natl_box/code/external_fields_load.F |
99 |
EXTERNAL_FIELDS_LOAD |
aWght=mod(myTime/externForcingPeriod,1. _d 0) |
|
./pkg/cfc/cfc11_forcing.F |
49 |
CFC11_FORCING |
_RL dtinc, aWght, bWght |
|
./pkg/cfc/cfc11_forcing.F |
70 |
CFC11_FORCING |
aWght=0.5d0+dtinc |
|
./pkg/cfc/cfc11_forcing.F |
71 |
CFC11_FORCING |
bWght=1.d0-aWght |
|
./pkg/cfc/cfc11_forcing.F |
75 |
CFC11_FORCING |
& + ACFC11(thisYear,1)*aWght |
|
./pkg/cfc/cfc11_forcing.F |
77 |
CFC11_FORCING |
& + ACFC11(thisYear,2)*aWght |
|
./pkg/cfc/cfc12_forcing.F |
50 |
CFC12_FORCING |
_RL dtinc, aWght, bWght |
|
./pkg/cfc/cfc12_forcing.F |
70 |
CFC12_FORCING |
aWght=0.5d0+dtinc |
|
./pkg/cfc/cfc12_forcing.F |
71 |
CFC12_FORCING |
bWght=1.d0-aWght |
|
./pkg/cfc/cfc12_forcing.F |
75 |
CFC12_FORCING |
& + ACFC12(thisYear,1)*aWght |
|
./pkg/cfc/cfc12_forcing.F |
77 |
CFC12_FORCING |
& + ACFC12(thisYear,2)*aWght |
|
./pkg/cfc/cfc_fields_load.F |
135 |
CFC_FIELDS_LOAD |
& +aWght*wspeed1(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
145 |
CFC_FIELDS_LOAD |
& +aWght*atmosp1(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
151 |
CFC_FIELDS_LOAD |
& +aWght*ice1(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
45 |
CFC_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/cfc/cfc_fields_load.F |
77 |
CFC_FIELDS_LOAD |
aWght=float( Iftm-Ifprd*intime0 )/float( Ifprd ) |
|
./pkg/cfc/cfc_fields_load.F |
78 |
CFC_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/offline/offline_fields_load.F |
101 |
OFFLINE_FIELDS_LOAD |
_RL aWght,bWght,rdt, KGM |
|
./pkg/offline/offline_fields_load.F |
150 |
OFFLINE_FIELDS_LOAD |
aWght=float( Iftm-Ifprd*intime0 )/float( Ifprd ) |
|
./pkg/offline/offline_fields_load.F |
151 |
OFFLINE_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/offline/offline_fields_load.F |
346 |
OFFLINE_FIELDS_LOAD |
& +aWght*uvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
348 |
OFFLINE_FIELDS_LOAD |
& +aWght*vvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
350 |
OFFLINE_FIELDS_LOAD |
& +aWght*wvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
352 |
OFFLINE_FIELDS_LOAD |
& +aWght*tave1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
354 |
OFFLINE_FIELDS_LOAD |
& +aWght*save1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
356 |
OFFLINE_FIELDS_LOAD |
& +aWght*conv1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
358 |
OFFLINE_FIELDS_LOAD |
& +aWght*conv1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
361 |
OFFLINE_FIELDS_LOAD |
& +aWght*gmkx1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
363 |
OFFLINE_FIELDS_LOAD |
& +aWght*gmky1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
365 |
OFFLINE_FIELDS_LOAD |
& +aWght*gmkz1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
368 |
OFFLINE_FIELDS_LOAD |
& +aWght*hflx1(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
372 |
OFFLINE_FIELDS_LOAD |
& +aWght*sflx1(i,j,bi,bj) |