| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_fields_load.F |
103 |
OBCS_FIELDS_LOAD |
O iRecP, iRec0, iRec1, bWght, aWght, |
|
./pkg/obcs/obcs_fields_load.F |
115 |
OBCS_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/obcs/obcs_fields_load.F |
340 |
OBCS_FIELDS_LOAD |
bWght = 1. _d 0 |
|
./pkg/obcs/obcs_fields_load.F |
508 |
OBCS_FIELDS_LOAD |
& OBEu, OBEu0, OBEu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
510 |
OBCS_FIELDS_LOAD |
& OBEv, OBEv0, OBEv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
512 |
OBCS_FIELDS_LOAD |
& OBEt, OBEt0, OBEt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
514 |
OBCS_FIELDS_LOAD |
& OBEs, OBEs0, OBEs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
517 |
OBCS_FIELDS_LOAD |
& OBEw, OBEw0, OBEw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
524 |
OBCS_FIELDS_LOAD |
OBEeta(j,bi,bj) = bWght*OBEeta0(j,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
534 |
OBCS_FIELDS_LOAD |
& OBWu, OBWu0, OBWu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
536 |
OBCS_FIELDS_LOAD |
& OBWv, OBWv0, OBWv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
538 |
OBCS_FIELDS_LOAD |
& OBWt, OBWt0, OBWt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
540 |
OBCS_FIELDS_LOAD |
& OBWs, OBWs0, OBWs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
543 |
OBCS_FIELDS_LOAD |
& OBWw, OBWw0, OBWw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
550 |
OBCS_FIELDS_LOAD |
OBWeta(j,bi,bj) = bWght*OBWeta0(j,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
560 |
OBCS_FIELDS_LOAD |
& OBNu, OBNu0, OBNu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
562 |
OBCS_FIELDS_LOAD |
& OBNv, OBNv0, OBNv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
564 |
OBCS_FIELDS_LOAD |
& OBNt, OBNt0, OBNt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
566 |
OBCS_FIELDS_LOAD |
& OBNs, OBNs0, OBNs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
569 |
OBCS_FIELDS_LOAD |
& OBNw, OBNw0, OBNw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
576 |
OBCS_FIELDS_LOAD |
OBNeta(i,bi,bj) = bWght*OBNeta0(i,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
586 |
OBCS_FIELDS_LOAD |
& OBSu, OBSu0, OBSu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
588 |
OBCS_FIELDS_LOAD |
& OBSv, OBSv0, OBSv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
590 |
OBCS_FIELDS_LOAD |
& OBSt, OBSt0, OBSt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
592 |
OBCS_FIELDS_LOAD |
& OBSs, OBSs0, OBSs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
595 |
OBCS_FIELDS_LOAD |
& OBSw, OBSw0, OBSw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
602 |
OBCS_FIELDS_LOAD |
OBSeta(i,bi,bj) = bWght*OBSeta0(i,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
619 |
OBCS_FIELDS_LOAD |
I OBEptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
626 |
OBCS_FIELDS_LOAD |
I OBWptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
633 |
OBCS_FIELDS_LOAD |
I OBNptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
640 |
OBCS_FIELDS_LOAD |
I OBSptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
657 |
OBCS_TIME_INTERP_XZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
680 |
OBCS_TIME_INTERP_XZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_fields_load.F |
692 |
OBCS_TIME_INTERP_XZ |
fld(i,k,bi,bj) = bWght*fld0(i,k,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
708 |
OBCS_TIME_INTERP_YZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
731 |
OBCS_TIME_INTERP_YZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_fields_load.F |
743 |
OBCS_TIME_INTERP_YZ |
fld(j,k,bi,bj) = bWght*fld0(j,k,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
86 |
OBCS_FIELDS_LOAD |
_RL aWght, bWght |
|
./pkg/offline/offline_fields_load.F |
105 |
OFFLINE_FIELDS_LOAD |
& intime0,intime1, ' ; Wght=', bWght, aWght |
|
./pkg/offline/offline_fields_load.F |
355 |
OFFLINE_FIELDS_LOAD |
offline_Wght(1,bi,bj) = bWght |
|
./pkg/offline/offline_fields_load.F |
360 |
OFFLINE_FIELDS_LOAD |
uVel(i,j,k,bi,bj) = bWght*uvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
362 |
OFFLINE_FIELDS_LOAD |
vVel(i,j,k,bi,bj) = bWght*vvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
364 |
OFFLINE_FIELDS_LOAD |
wVel(i,j,k,bi,bj) = bWght*wvel0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
366 |
OFFLINE_FIELDS_LOAD |
theta(i,j,k,bi,bj)= bWght*tave0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
368 |
OFFLINE_FIELDS_LOAD |
salt(i,j,k,bi,bj) = bWght*save0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
371 |
OFFLINE_FIELDS_LOAD |
Kwx(i,j,k,bi,bj) = bWght*gmkx0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
373 |
OFFLINE_FIELDS_LOAD |
Kwy(i,j,k,bi,bj) = bWght*gmky0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
375 |
OFFLINE_FIELDS_LOAD |
Kwz(i,j,k,bi,bj) = bWght*gmkz0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
380 |
OFFLINE_FIELDS_LOAD |
IVDConvCount(i,j,k,bi,bj) = bWght*conv0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
383 |
OFFLINE_FIELDS_LOAD |
KPPdiffKzS(i,j,k,bi,bj) = bWght*kdfs0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
387 |
OFFLINE_FIELDS_LOAD |
KPPghat(i,j,k,bi,bj) = bWght*kght0(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
426 |
OFFLINE_FIELDS_LOAD |
surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
75 |
OFFLINE_FIELDS_LOAD |
_RL aWght, bWght, locTime |
|
./pkg/offline/offline_fields_load.F |
93 |
OFFLINE_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/offline/offline_get_surfforcing.F |
51 |
OFFLINE_GET_SURFFORCING |
_RL aWght, bWght |
|
./pkg/offline/offline_get_surfforcing.F |
58 |
OFFLINE_GET_SURFFORCING |
bWght = offline_Wght(1,bi,bj) |
|
./pkg/offline/offline_get_surfforcing.F |
66 |
OFFLINE_GET_SURFFORCING |
surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
238 |
RBCS_FIELDS_LOAD |
RBCuVel(i,j,k,bi,bj) = bWght*rbcu0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
240 |
RBCS_FIELDS_LOAD |
RBCvVel(i,j,k,bi,bj) = bWght*rbcv0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
250 |
RBCS_FIELDS_LOAD |
RBCtemp(i,j,k,bi,bj) = bWght*rbct0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
252 |
RBCS_FIELDS_LOAD |
RBCsalt(i,j,k,bi,bj) = bWght*rbcs0(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
270 |
RBCS_FIELDS_LOAD |
& bWght*rbcptr0(i,j,k,bi,bj,iTracer) |
|
./pkg/rbcs/rbcs_fields_load.F |
57 |
RBCS_FIELDS_LOAD |
_RL aWght, bWght, locTime |
|
./pkg/rbcs/rbcs_fields_load.F |
78 |
RBCS_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/rbcs/rbcs_fields_load.F |
87 |
RBCS_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/rbcs/rbcs_fields_load.F |
96 |
RBCS_FIELDS_LOAD |
bWght = .5 _d 0 |
|
./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 |
63 |
EXTERNAL_FIELDS_LOAD |
_RL aWght, bWght |
|
./model/src/external_fields_load.F |
73 |
EXTERNAL_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./model/src/external_fields_load.F |
85 |
EXTERNAL_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
121 |
BULKF_FIELDS_LOAD |
_RL aWght,bWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
173 |
BULKF_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/bulk_force/bulkf_fields_load.F |
185 |
BULKF_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/bulk_force/bulkf_fields_load.F |
367 |
BULKF_FIELDS_LOAD |
TAIR(i,j,bi,bj) = bWght*tair0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
372 |
BULKF_FIELDS_LOAD |
QAIR(i,j,bi,bj) =(bWght*qair0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
374 |
BULKF_FIELDS_LOAD |
SOLAR(i,j,bi,bj) = bWght*solar0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
376 |
BULKF_FIELDS_LOAD |
FLWDWN(i,j,bi,bj) = bWght*flwdwn0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
378 |
BULKF_FIELDS_LOAD |
CLOUD(i,j,bi,bj) = bWght*cloud0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
380 |
BULKF_FIELDS_LOAD |
WSPEED(i,j,bi,bj) = bWght*wspeed0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
382 |
BULKF_FIELDS_LOAD |
UWIND(i,j,bi,bj) = bWght*uwind0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
384 |
BULKF_FIELDS_LOAD |
VWIND(i,j,bi,bj) = bWght*vwind0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
386 |
BULKF_FIELDS_LOAD |
RAIN(i,j,bi,bj) = bWght*rain0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
388 |
BULKF_FIELDS_LOAD |
RUNOFF(i,j,bi,bj) = bWght*runoff0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
394 |
BULKF_FIELDS_LOAD |
Qnetch(i,j,bi,bj) = bWght*qnetch0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
396 |
BULKF_FIELDS_LOAD |
EmPch(i,j,bi,bj) = bWght*empch0(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
404 |
BULKF_FIELDS_LOAD |
thAir(i,j,bi,bj) = bWght*thAir0(i,j,bi,bj) |
|
./pkg/cfc/cfc11_forcing.F |
102 |
CFC11_FORCING |
& intime0, bWght, ACFCyear(iRec0) |
|
./pkg/cfc/cfc11_forcing.F |
72 |
CFC11_FORCING |
_RL cfcTime, aWght, bWght |
|
./pkg/cfc/cfc11_forcing.F |
87 |
CFC11_FORCING |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cfc/cfc11_forcing.F |
92 |
CFC11_FORCING |
ACFC11north = ACFC11( iRec0, 1 )*bWght |
|
./pkg/cfc/cfc11_forcing.F |
94 |
CFC11_FORCING |
ACFC11south = ACFC11( iRec0, 2 )*bWght |
|
./pkg/cfc/cfc12_forcing.F |
103 |
CFC12_FORCING |
& intime0, bWght, ACFCyear(iRec0) |
|
./pkg/cfc/cfc12_forcing.F |
73 |
CFC12_FORCING |
_RL cfcTime, aWght, bWght |
|
./pkg/cfc/cfc12_forcing.F |
88 |
CFC12_FORCING |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cfc/cfc12_forcing.F |
93 |
CFC12_FORCING |
ACFC12north = ACFC12( iRec0, 1 )*bWght |
|
./pkg/cfc/cfc12_forcing.F |
95 |
CFC12_FORCING |
ACFC12south = ACFC12( iRec0, 2 )*bWght |
|
./pkg/cfc/cfc_fields_load.F |
185 |
CFC_FIELDS_LOAD |
locWind(i,j) = bWght*wind0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
209 |
CFC_FIELDS_LOAD |
ATMOSP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
241 |
CFC_FIELDS_LOAD |
FIce(i,j,bi,bj) = bWght*ice0(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
54 |
CFC_FIELDS_LOAD |
_RL aWght, bWght |
|
./pkg/cfc/cfc_fields_load.F |
78 |
CFC_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cfc/cfc_fields_load.F |
90 |
CFC_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/cheapaml/cheapaml_fields_load.F |
247 |
CHEAPAML_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
377 |
CHEAPAML_FIELDS_LOAD |
TR(i,j,bi,bj) = bWght*trair0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
379 |
CHEAPAML_FIELDS_LOAD |
qr(i,j,bi,bj) = bWght*qrair0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
381 |
CHEAPAML_FIELDS_LOAD |
uWind(i,j,bi,bj) = bWght*uWind0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
383 |
CHEAPAML_FIELDS_LOAD |
vWind(i,j,bi,bj) = bWght*vWind0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
385 |
CHEAPAML_FIELDS_LOAD |
solar(i,j,bi,bj) = bWght*solar0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
388 |
CHEAPAML_FIELDS_LOAD |
ustress(i,j,bi,bj) = bWght*ustress0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
390 |
CHEAPAML_FIELDS_LOAD |
vstress(i,j,bi,bj) = bWght*vstress0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
394 |
CHEAPAML_FIELDS_LOAD |
CheapHgrid(i,j,bi,bj) = bWght*cheaph0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
398 |
CHEAPAML_FIELDS_LOAD |
cheapclouds(i,j,bi,bj) = bWght*cheapcl0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
402 |
CHEAPAML_FIELDS_LOAD |
cheapdlongwave(i,j,bi,bj) = bWght*cheaplw0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
406 |
CHEAPAML_FIELDS_LOAD |
CheaptracerR(i,j,bi,bj) = bWght*CheaptracerR0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
411 |
CHEAPAML_FIELDS_LOAD |
wavesh(i,j,bi,bj) = bWght*wavesh0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
415 |
CHEAPAML_FIELDS_LOAD |
wavesp(i,j,bi,bj) = bWght*wavesp0(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
97 |
CHEAPAML_FIELDS_LOAD |
_RL aWght, bWght |
|
./pkg/dic/dic_atmos.F |
71 |
DIC_ATMOS |
_RL aWght, bWght |
|
./pkg/dic/dic_atmos.F |
87 |
DIC_ATMOS |
bWght = FLOAT(dic_int4) |
|
./pkg/dic/dic_atmos.F |
88 |
DIC_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_atmos.F |
93 |
DIC_ATMOS |
bWght = 1. _d 0 - aWght |
|
./pkg/dic/dic_atmos.F |
94 |
DIC_ATMOS |
atm_pCO2 = co2atmos(ntim)*bWght + co2atmos(ntim+1)*aWght |
|
./pkg/dic/dic_atmos.F |
95 |
DIC_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_fields_load.F |
172 |
DIC_FIELDS_LOAD |
WIND(i,j,bi,bj) = bWght*dicwind0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
185 |
DIC_FIELDS_LOAD |
AtmosP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
194 |
DIC_FIELDS_LOAD |
SILICA(i,j,bi,bj) = bWght*silica0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
202 |
DIC_FIELDS_LOAD |
FIce(i,j,bi,bj) = bWght*ice0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
212 |
DIC_FIELDS_LOAD |
PAR(i,j,bi,bj) = bWght*par0(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
228 |
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 |
|
./pkg/dic/dic_fields_load.F |
55 |
DIC_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/dic/dic_fields_load.F |
67 |
DIC_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/dic/dic_ini_atmos.F |
103 |
DIC_INI_ATMOS |
bWght = 1. _d 0 - aWght |
|
./pkg/dic/dic_ini_atmos.F |
104 |
DIC_INI_ATMOS |
atm_pCO2 = co2atmos(ntim)*bWght + co2atmos(ntim+1)*aWght |
|
./pkg/dic/dic_ini_atmos.F |
105 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_ini_atmos.F |
71 |
DIC_INI_ATMOS |
_RL aWght, bWght |
|
./pkg/dic/dic_ini_atmos.F |
97 |
DIC_INI_ATMOS |
bWght = FLOAT(dic_int4) |
|
./pkg/dic/dic_ini_atmos.F |
98 |
DIC_INI_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_surfforcing_init.F |
103 |
DIC_SURFFORCING_INIT |
SILICA(i,j,bi,bj)= bWght*silica0(i,j,bi,bj) |
|
./pkg/dic/dic_surfforcing_init.F |
40 |
DIC_SURFFORCING_INIT |
_RL aWght, bWght, co3dummy |
|
./pkg/dic/dic_surfforcing_init.F |
70 |
DIC_SURFFORCING_INIT |
O intimeP, intime0, intime1, bWght, aWght, |