| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/bulkf_fields_load.F |
120 |
BULKF_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/bulk_force/bulkf_fields_load.F |
183 |
BULKF_FIELDS_LOAD |
bWght = 1. _d 0 - aWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
335 |
BULKF_FIELDS_LOAD |
TAIR(i,j,bi,bj) = bWght*tair0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
340 |
BULKF_FIELDS_LOAD |
QAIR(i,j,bi,bj) =(bWght*qair0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
342 |
BULKF_FIELDS_LOAD |
SOLAR(i,j,bi,bj) = bWght*solar0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
344 |
BULKF_FIELDS_LOAD |
FLWDWN(i,j,bi,bj) = bWght*flwdwn0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
346 |
BULKF_FIELDS_LOAD |
CLOUD(i,j,bi,bj) = bWght*cloud0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
348 |
BULKF_FIELDS_LOAD |
WSPEED(i,j,bi,bj) = bWght*wspeed0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
350 |
BULKF_FIELDS_LOAD |
UWIND(i,j,bi,bj) = bWght*uwind0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
352 |
BULKF_FIELDS_LOAD |
VWIND(i,j,bi,bj) = bWght*vwind0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
354 |
BULKF_FIELDS_LOAD |
RAIN(i,j,bi,bj) = bWght*rain0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
356 |
BULKF_FIELDS_LOAD |
RUNOFF(i,j,bi,bj) = bWght*runoff0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
359 |
BULKF_FIELDS_LOAD |
SNOW(i,j,bi,bj) = bWght*snow0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
362 |
BULKF_FIELDS_LOAD |
QNETCH(i,j,bi,bj) = bWght*qnetch0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
364 |
BULKF_FIELDS_LOAD |
EMPCH(i,j,bi,bj) = bWght*empch0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
372 |
BULKF_FIELDS_LOAD |
thAir(i,j,bi,bj) = bWght*thAir0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
156 |
DIC_FIELDS_LOAD |
WIND(i,j,bi,bj) = bWght*wspeed0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
166 |
DIC_FIELDS_LOAD |
ATMOSP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
172 |
DIC_FIELDS_LOAD |
SILICA(i,j,bi,bj) = bWght*silica0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
178 |
DIC_FIELDS_LOAD |
FIce(i,j,bi,bj) = bWght*ice0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
188 |
DIC_FIELDS_LOAD |
PAR(i,j,bi,bj) = bWght*par0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
196 |
DIC_FIELDS_LOAD |
InputFe(i,j,bi,bj) = bWght*feinput0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
45 |
DIC_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/dic/dic_fields_load.F |
67 |
DIC_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/dic/dic_surfforcing_init.F |
108 |
DIC_SURFFORCING_INIT |
SILICA(i,j,bi,bj) = bWght*silica0(i,j,bi,bj) |
|
./pkg/dic/dic_surfforcing_init.F |
44 |
DIC_SURFFORCING_INIT |
_RL aWght,bWght,rdt |
|
./pkg/dic/dic_surfforcing_init.F |
75 |
DIC_SURFFORCING_INIT |
bWght=1.-aWght |
|
./pkg/offline/offline_fields_load.F |
109 |
OFFLINE_FIELDS_LOAD |
_RL aWght,bWght,rdt, KGM |
|
./pkg/offline/offline_fields_load.F |
162 |
OFFLINE_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/offline/offline_fields_load.F |
391 |
OFFLINE_FIELDS_LOAD |
Uvel(i,j,k,bi,bj) = bWght*uvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
393 |
OFFLINE_FIELDS_LOAD |
Vvel(i,j,k,bi,bj) = bWght*vvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
395 |
OFFLINE_FIELDS_LOAD |
Wvel(i,j,k,bi,bj) = bWght*wvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
397 |
OFFLINE_FIELDS_LOAD |
theta(i,j,k,bi,bj) = bWght*tave0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
399 |
OFFLINE_FIELDS_LOAD |
salt(i,j,k,bi,bj) = bWght*save0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
401 |
OFFLINE_FIELDS_LOAD |
ConvectCount(i,j,k,bi,bj) = bWght*conv0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
403 |
OFFLINE_FIELDS_LOAD |
IVDConvCount(i,j,k,bi,bj) = bWght*conv0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
406 |
OFFLINE_FIELDS_LOAD |
Kwx(i,j,k,bi,bj) = bWght*gmkx0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
408 |
OFFLINE_FIELDS_LOAD |
Kwy(i,j,k,bi,bj) = bWght*gmky0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
410 |
OFFLINE_FIELDS_LOAD |
Kwz(i,j,k,bi,bj) = bWght*gmkz0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
413 |
OFFLINE_FIELDS_LOAD |
surfaceForcingT(i,j,bi,bj) = bWght*hflx0(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
417 |
OFFLINE_FIELDS_LOAD |
surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
422 |
OFFLINE_FIELDS_LOAD |
KPPdiffKzS(i,j,k,bi,bj) = bWght*kdfs0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
424 |
OFFLINE_FIELDS_LOAD |
KPPghat(i,j,k,bi,bj) = bWght*kght0(i,j,k,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
100 |
EXTERNAL_FIELDS_LOAD |
bWght=1.-aWght |
|
./verification/natl_box/code/external_fields_load.F |
208 |
EXTERNAL_FIELDS_LOAD |
SST(i,j,bi,bj) = bWght*SST0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
210 |
EXTERNAL_FIELDS_LOAD |
SSS(i,j,bi,bj) = bWght*SSS0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
212 |
EXTERNAL_FIELDS_LOAD |
fu(i,j,bi,bj) = -(bWght*taux0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
214 |
EXTERNAL_FIELDS_LOAD |
fv(i,j,bi,bj) = -(bWght*tauy0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
216 |
EXTERNAL_FIELDS_LOAD |
Qnet(i,j,bi,bj) = bWght*Qnet0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
218 |
EXTERNAL_FIELDS_LOAD |
EmPmR(i,j,bi,bj) = bWght*EmPmR0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
221 |
EXTERNAL_FIELDS_LOAD |
Qsw(i,j,bi,bj) = bWght*Qsw0(i,j,bi,bj) |
|
./verification/natl_box/code/external_fields_load.F |
62 |
EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./model/src/external_fields_load.F |
116 |
EXTERNAL_FIELDS_LOAD |
bWght = 1. _d 0 - aWght |
|
./model/src/external_fields_load.F |
245 |
EXTERNAL_FIELDS_LOAD |
SST(i,j,bi,bj) = bWght*SST0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
253 |
EXTERNAL_FIELDS_LOAD |
SSS(i,j,bi,bj) = bWght*SSS0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
261 |
EXTERNAL_FIELDS_LOAD |
fu(i,j,bi,bj) = bWght*taux0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
269 |
EXTERNAL_FIELDS_LOAD |
fv(i,j,bi,bj) = bWght*tauy0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
278 |
EXTERNAL_FIELDS_LOAD |
Qnet(i,j,bi,bj) = bWght*Qnet0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
286 |
EXTERNAL_FIELDS_LOAD |
EmPmR(i,j,bi,bj) = bWght*EmPmR0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
294 |
EXTERNAL_FIELDS_LOAD |
saltFlux(i,j,bi,bj) = bWght*saltFlux0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
303 |
EXTERNAL_FIELDS_LOAD |
Qsw(i,j,bi,bj) = bWght*Qsw0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
313 |
EXTERNAL_FIELDS_LOAD |
pload(i,j,bi,bj) = bWght*pload0(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
360 |
EXTERNAL_FIELDS_LOAD |
& intime0,intime1,aWght,bWght |
|
./model/src/external_fields_load.F |
365 |
EXTERNAL_FIELDS_LOAD |
& aWght,bWght |
|
./model/src/external_fields_load.F |
62 |
EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/cfc/cfc11_forcing.F |
49 |
CFC11_FORCING |
_RL dtinc, aWght, bWght |
|
./pkg/cfc/cfc11_forcing.F |
71 |
CFC11_FORCING |
bWght=1.d0-aWght |
|
./pkg/cfc/cfc11_forcing.F |
74 |
CFC11_FORCING |
ACFC11north = ACFC11(lastYear,1)*bWght |
|
./pkg/cfc/cfc11_forcing.F |
76 |
CFC11_FORCING |
ACFC11south = ACFC11(lastYear,2)*bWght |
|
./pkg/cfc/cfc_fields_load.F |
134 |
CFC_FIELDS_LOAD |
WIND(i,j,bi,bj) = bWght*wspeed0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
144 |
CFC_FIELDS_LOAD |
ATMOSP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
150 |
CFC_FIELDS_LOAD |
FIce(i,j,bi,bj) = bWght*ice0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
45 |
CFC_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/cfc/cfc_fields_load.F |
78 |
CFC_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/cfc/cfc12_forcing.F |
50 |
CFC12_FORCING |
_RL dtinc, aWght, bWght |
|
./pkg/cfc/cfc12_forcing.F |
71 |
CFC12_FORCING |
bWght=1.d0-aWght |
|
./pkg/cfc/cfc12_forcing.F |
74 |
CFC12_FORCING |
ACFC12north = ACFC12(lastYear,1)*bWght |
|
./pkg/cfc/cfc12_forcing.F |
76 |
CFC12_FORCING |
ACFC12south = ACFC12(lastYear,2)*bWght |
|
./pkg/obcs/obcs_external_fields_load.F |
289 |
OBCS_EXTERNAL_FIELDS_LOAD |
bWght = 1. _d 0 |
|
./pkg/obcs/obcs_external_fields_load.F |
429 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEu, OBEu0, OBEu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
431 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEv, OBEv0, OBEv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
433 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEt, OBEt0, OBEt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
435 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEs, OBEs0, OBEs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
439 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWu, OBWu0, OBWu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
441 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWv, OBWv0, OBWv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
443 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWt, OBWt0, OBWt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
445 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWs, OBWs0, OBWs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
449 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNu, OBNu0, OBNu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
451 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNv, OBNv0, OBNv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
453 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNt, OBNt0, OBNt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
455 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNs, OBNs0, OBNs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
459 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSu, OBSu0, OBSu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
461 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSv, OBSv0, OBSv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
463 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSt, OBSt0, OBSt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
465 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSs, OBSs0, OBSs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
476 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBEptr1(1-Oly,1,1,1,iTracer), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
483 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBWptr1(1-Oly,1,1,1,iTracer), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
490 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBNptr1(1-Olx,1,1,1,iTracer), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
497 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBSptr1(1-Olx,1,1,1,iTracer), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
515 |
OBCS_EXTERNAL_FIELDS_INTERP_XZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
535 |
OBCS_EXTERNAL_FIELDS_INTERP_XZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_external_fields_load.F |
549 |
OBCS_EXTERNAL_FIELDS_INTERP_XZ |
fld(i,k,bi,bj) = bWght*fld0(i,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
563 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
583 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_external_fields_load.F |
597 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
fld(j,k,bi,bj) = bWght*fld0(j,k,bi,bj) |
|
./pkg/obcs/obcs_external_fields_load.F |
76 |
OBCS_EXTERNAL_FIELDS_LOAD |
_RL aWght,bWght,rdt |
|
./pkg/obcs/obcs_external_fields_load.F |
94 |
OBCS_EXTERNAL_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/rbcs/rbcs_fields_load.F |
116 |
RBCS_FIELDS_LOAD |
bWght=1.-aWght |
|
./pkg/rbcs/rbcs_fields_load.F |
126 |
RBCS_FIELDS_LOAD |
bWght=.5d0 |
|
./pkg/rbcs/rbcs_fields_load.F |
198 |
RBCS_FIELDS_LOAD |
RBCtemp(i,j,k,bi,bj) = bWght*rbct0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
200 |
RBCS_FIELDS_LOAD |
RBCsalt(i,j,k,bi,bj) = bWght*rbcs0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
218 |
RBCS_FIELDS_LOAD |
& bWght*rbcptracer0(i,j,k,bi,bj,iTracer) |
|
./pkg/rbcs/rbcs_fields_load.F |
58 |
RBCS_FIELDS_LOAD |
_RL aWght,bWght,rdt |