| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffieldrec.F |
225 |
EXF_GETFFIELDREC |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/exf/exf_getffieldrec.F |
252 |
EXF_GETFFIELDREC |
& 'EXF_GetFFieldRec: bWght,aWght=', bWght, ',', aWght, |
|
./pkg/exf/exf_getffieldrec.F |
89 |
EXF_GETFFIELDREC |
_RL locTime, aWght, bWght |
|
./pkg/obcs/obcs_fields_load.F |
103 |
OBCS_FIELDS_LOAD |
O iRecP, iRec0, iRec1, bWght, aWght, |
|
./pkg/obcs/obcs_fields_load.F |
116 |
OBCS_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/obcs/obcs_fields_load.F |
346 |
OBCS_FIELDS_LOAD |
aWght = 0. _d 0 |
|
./pkg/obcs/obcs_fields_load.F |
515 |
OBCS_FIELDS_LOAD |
& OBEu, OBEu0, OBEu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
517 |
OBCS_FIELDS_LOAD |
& OBEv, OBEv0, OBEv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
519 |
OBCS_FIELDS_LOAD |
& OBEt, OBEt0, OBEt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
521 |
OBCS_FIELDS_LOAD |
& OBEs, OBEs0, OBEs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
524 |
OBCS_FIELDS_LOAD |
& OBEw, OBEw0, OBEw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
532 |
OBCS_FIELDS_LOAD |
& +aWght*OBEeta1(j,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
541 |
OBCS_FIELDS_LOAD |
& OBWu, OBWu0, OBWu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
543 |
OBCS_FIELDS_LOAD |
& OBWv, OBWv0, OBWv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
545 |
OBCS_FIELDS_LOAD |
& OBWt, OBWt0, OBWt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
547 |
OBCS_FIELDS_LOAD |
& OBWs, OBWs0, OBWs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
550 |
OBCS_FIELDS_LOAD |
& OBWw, OBWw0, OBWw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
558 |
OBCS_FIELDS_LOAD |
& +aWght*OBWeta1(j,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
567 |
OBCS_FIELDS_LOAD |
& OBNu, OBNu0, OBNu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
569 |
OBCS_FIELDS_LOAD |
& OBNv, OBNv0, OBNv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
571 |
OBCS_FIELDS_LOAD |
& OBNt, OBNt0, OBNt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
573 |
OBCS_FIELDS_LOAD |
& OBNs, OBNs0, OBNs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
576 |
OBCS_FIELDS_LOAD |
& OBNw, OBNw0, OBNw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
584 |
OBCS_FIELDS_LOAD |
& +aWght*OBNeta1(i,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
593 |
OBCS_FIELDS_LOAD |
& OBSu, OBSu0, OBSu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
595 |
OBCS_FIELDS_LOAD |
& OBSv, OBSv0, OBSv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
597 |
OBCS_FIELDS_LOAD |
& OBSt, OBSt0, OBSt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
599 |
OBCS_FIELDS_LOAD |
& OBSs, OBSs0, OBSs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
602 |
OBCS_FIELDS_LOAD |
& OBSw, OBSw0, OBSw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
610 |
OBCS_FIELDS_LOAD |
& +aWght*OBSeta1(i,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
626 |
OBCS_FIELDS_LOAD |
I OBEptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
633 |
OBCS_FIELDS_LOAD |
I OBWptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
640 |
OBCS_FIELDS_LOAD |
I OBNptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
647 |
OBCS_FIELDS_LOAD |
I OBSptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
664 |
OBCS_TIME_INTERP_XZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
687 |
OBCS_TIME_INTERP_XZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_fields_load.F |
700 |
OBCS_TIME_INTERP_XZ |
& +aWght*fld1(i,k,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
715 |
OBCS_TIME_INTERP_YZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
738 |
OBCS_TIME_INTERP_YZ |
_RL aWght,bWght |
|
./pkg/obcs/obcs_fields_load.F |
751 |
OBCS_TIME_INTERP_YZ |
& +aWght*fld1(j,k,bi,bj) |
|
./pkg/obcs/obcs_fields_load.F |
86 |
OBCS_FIELDS_LOAD |
_RL aWght, bWght |
|
./pkg/offline/offline_fields_load.F |
104 |
OFFLINE_FIELDS_LOAD |
& intime0,intime1, ' ; Wght=', bWght, aWght |
|
./pkg/offline/offline_fields_load.F |
355 |
OFFLINE_FIELDS_LOAD |
offline_Wght(2,bi,bj) = aWght |
|
./pkg/offline/offline_fields_load.F |
370 |
OFFLINE_FIELDS_LOAD |
& + aWght*uvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
372 |
OFFLINE_FIELDS_LOAD |
& + aWght*vvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
374 |
OFFLINE_FIELDS_LOAD |
& + aWght*wvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
376 |
OFFLINE_FIELDS_LOAD |
& + aWght*tave1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
378 |
OFFLINE_FIELDS_LOAD |
& + aWght*save1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
75 |
OFFLINE_FIELDS_LOAD |
_RL aWght, bWght, locTime |
|
./pkg/offline/offline_fields_load.F |
92 |
OFFLINE_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/offline/offline_get_diffus.F |
108 |
OFFLINE_GET_DIFFUS |
& + aWght*gmkx1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
110 |
OFFLINE_GET_DIFFUS |
& + aWght*gmky1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
112 |
OFFLINE_GET_DIFFUS |
& + aWght*gmkz1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
124 |
OFFLINE_GET_DIFFUS |
& + aWght*kdfs1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
128 |
OFFLINE_GET_DIFFUS |
& + aWght*kght1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
142 |
OFFLINE_GET_DIFFUS |
& + aWght*sflx1(i,j,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
56 |
OFFLINE_GET_DIFFUS |
_RL aWght, bWght |
|
./pkg/offline/offline_get_diffus.F |
69 |
OFFLINE_GET_DIFFUS |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/offline/offline_get_diffus.F |
79 |
OFFLINE_GET_DIFFUS |
aWght = offline_Wght(2,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
87 |
OFFLINE_GET_DIFFUS |
& + aWght*wvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
97 |
OFFLINE_GET_DIFFUS |
& + aWght*conv1(i,j,k,bi,bj) |
|
./model/src/external_fields_load.F |
246 |
EXTERNAL_FIELDS_LOAD |
& + aWght*SST1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
254 |
EXTERNAL_FIELDS_LOAD |
& + aWght*SSS1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
262 |
EXTERNAL_FIELDS_LOAD |
& + aWght*taux1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
270 |
EXTERNAL_FIELDS_LOAD |
& + aWght*tauy1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
279 |
EXTERNAL_FIELDS_LOAD |
& + aWght*Qnet1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
287 |
EXTERNAL_FIELDS_LOAD |
& + aWght*EmPmR1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
295 |
EXTERNAL_FIELDS_LOAD |
& + aWght*saltFlux1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
304 |
EXTERNAL_FIELDS_LOAD |
& + aWght*Qsw1(i,j,bi,bj) |
|
./model/src/external_fields_load.F |
314 |
EXTERNAL_FIELDS_LOAD |
& + aWght*pLoad1(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/rbcs/rbcs_fields_load.F |
239 |
RBCS_FIELDS_LOAD |
& +aWght*rbcu1(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
241 |
RBCS_FIELDS_LOAD |
& +aWght*rbcv1(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
251 |
RBCS_FIELDS_LOAD |
& +aWght*rbct1(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
253 |
RBCS_FIELDS_LOAD |
& +aWght*rbcs1(i,j,k,bi,bj) |
|
./pkg/rbcs/rbcs_fields_load.F |
271 |
RBCS_FIELDS_LOAD |
& +aWght*rbcptr1(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 |
95 |
RBCS_FIELDS_LOAD |
aWght = .5 _d 0 |
|
./pkg/bling/bling_carbonate_init.F |
39 |
BLING_CARBONATE_INIT |
_RL aWght, bWght, co3dummy |
|
./pkg/bling/bling_carbonate_init.F |
62 |
BLING_CARBONATE_INIT |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/bling/bling_carbonate_init.F |
95 |
BLING_CARBONATE_INIT |
& + aWght*silica1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
163 |
BLING_FIELDS_LOAD |
& + aWght*dicwind1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
172 |
BLING_FIELDS_LOAD |
& + aWght*atmosp1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
181 |
BLING_FIELDS_LOAD |
& + aWght*silica1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
189 |
BLING_FIELDS_LOAD |
& + aWght*ice1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
198 |
BLING_FIELDS_LOAD |
& + aWght*feinput1(i,j,bi,bj) |
|
./pkg/bling/bling_fields_load.F |
53 |
BLING_FIELDS_LOAD |
_RL aWght,bWght |
|
./pkg/bling/bling_fields_load.F |
60 |
BLING_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/bling/bling_fields_load.F |
73 |
BLING_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 |
368 |
BULKF_FIELDS_LOAD |
& +aWght*tair1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
373 |
BULKF_FIELDS_LOAD |
& +aWght*qair1(i,j,bi,bj) ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
375 |
BULKF_FIELDS_LOAD |
& +aWght*solar1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
377 |
BULKF_FIELDS_LOAD |
& +aWght*flwdwn1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
379 |
BULKF_FIELDS_LOAD |
& +aWght*cloud1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
381 |
BULKF_FIELDS_LOAD |
& +aWght*wspeed1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
383 |
BULKF_FIELDS_LOAD |
& +aWght*uwind1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
385 |
BULKF_FIELDS_LOAD |
& +aWght*vwind1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
387 |
BULKF_FIELDS_LOAD |
& +aWght*rain1(i,j,bi,bj) |
|
./pkg/bulk_force/bulkf_fields_load.F |
389 |
BULKF_FIELDS_LOAD |
& +aWght*runoff1(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 |
405 |
BULKF_FIELDS_LOAD |
& + aWght*thAir1(i,j,bi,bj) |
|
./pkg/cfc/cfc11_forcing.F |
107 |
CFC11_FORCING |
& intime1, aWght, ACFCyear(iRec1) |
|
./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 |
93 |
CFC11_FORCING |
& + ACFC11( iRec1, 1 )*aWght |
|
./pkg/cfc/cfc11_forcing.F |
95 |
CFC11_FORCING |
& + ACFC11( iRec1, 2 )*aWght |
|
./pkg/cfc/cfc12_forcing.F |
108 |
CFC12_FORCING |
& intime1, aWght, ACFCyear(iRec1) |
|
./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 |
94 |
CFC12_FORCING |
& + ACFC12( iRec1, 1 )*aWght |
|
./pkg/cfc/cfc12_forcing.F |
96 |
CFC12_FORCING |
& + ACFC12( iRec1, 2 )*aWght |
|
./pkg/cfc/cfc_fields_load.F |
186 |
CFC_FIELDS_LOAD |
& + aWght*wind1(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
210 |
CFC_FIELDS_LOAD |
& + aWght*atmosp1(i,j,bi,bj) |
|
./pkg/cfc/cfc_fields_load.F |
242 |
CFC_FIELDS_LOAD |
& + aWght*ice1(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 |
100 |
CHEAPAML_FIELDS_LOAD |
_RL aWght, bWght |
|
./pkg/cheapaml/cheapaml_fields_load.F |
170 |
CHEAPAML_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
388 |
CHEAPAML_FIELDS_LOAD |
& + aWght*trair1(i,j,bi,bj) !+273.15 |
|
./pkg/cheapaml/cheapaml_fields_load.F |
390 |
CHEAPAML_FIELDS_LOAD |
& + aWght*qrair1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
392 |
CHEAPAML_FIELDS_LOAD |
& + aWght*uWind1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
394 |
CHEAPAML_FIELDS_LOAD |
& + aWght*vWind1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
396 |
CHEAPAML_FIELDS_LOAD |
& + aWght*solar1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
399 |
CHEAPAML_FIELDS_LOAD |
& + aWght*ustress1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
401 |
CHEAPAML_FIELDS_LOAD |
& + aWght*vstress1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
405 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheaph1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
409 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheapcl1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
413 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheaplw1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
417 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheappr1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
421 |
CHEAPAML_FIELDS_LOAD |
& + aWght*CheaptracerR1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
426 |
CHEAPAML_FIELDS_LOAD |
& + aWght*wavesh1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
430 |
CHEAPAML_FIELDS_LOAD |
& + aWght*wavesp1(i,j,bi,bj) |
|
./pkg/dic/dic_atmos.F |
65 |
DIC_ATMOS |
_RL aWght, bWght |
|
./pkg/dic/dic_atmos.F |
80 |
DIC_ATMOS |
aWght = FLOAT(myIter-dic_int3) |
|
./pkg/dic/dic_atmos.F |
82 |
DIC_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_atmos.F |
83 |
DIC_ATMOS |
IF (aWght.GT.1. _d 0) THEN |
|
./pkg/dic/dic_atmos.F |
85 |
DIC_ATMOS |
aWght=aWght-1. _d 0 |
|
./pkg/dic/dic_atmos.F |
87 |
DIC_ATMOS |
bWght = 1. _d 0 - aWght |
|
./pkg/dic/dic_atmos.F |
88 |
DIC_ATMOS |
atm_pCO2 = co2atmos(ntim)*bWght + co2atmos(ntim+1)*aWght |
|
./pkg/dic/dic_atmos.F |
89 |
DIC_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_fields_load.F |
176 |
DIC_FIELDS_LOAD |
& + aWght*dicwind1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
189 |
DIC_FIELDS_LOAD |
& + aWght*atmosp1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
198 |
DIC_FIELDS_LOAD |
& + aWght*silica1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
206 |
DIC_FIELDS_LOAD |
& + aWght*ice1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
216 |
DIC_FIELDS_LOAD |
& + aWght*par1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
241 |
DIC_FIELDS_LOAD |
& + aWght*feinput1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
38 |
DIC_FIELDS_LOAD |
_RL aWght,bWght |
|
./pkg/dic/dic_fields_load.F |
48 |
DIC_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/dic/dic_fields_load.F |
60 |
DIC_FIELDS_LOAD |
& ' ; Wght=', bWght, aWght |
|
./pkg/dic/dic_ini_atmos.F |
61 |
DIC_INI_ATMOS |
_RL aWght, bWght |
|
./pkg/dic/dic_ini_atmos.F |
85 |
DIC_INI_ATMOS |
aWght = FLOAT(myIter-dic_int3) |
|
./pkg/dic/dic_ini_atmos.F |
87 |
DIC_INI_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_ini_atmos.F |
88 |
DIC_INI_ATMOS |
IF (aWght.GT.1. _d 0) THEN |
|
./pkg/dic/dic_ini_atmos.F |
90 |
DIC_INI_ATMOS |
aWght=aWght-1. _d 0 |
|
./pkg/dic/dic_ini_atmos.F |
92 |
DIC_INI_ATMOS |
bWght = 1. _d 0 - aWght |
|
./pkg/dic/dic_ini_atmos.F |
93 |
DIC_INI_ATMOS |
atm_pCO2 = co2atmos(ntim)*bWght + co2atmos(ntim+1)*aWght |
|
./pkg/dic/dic_ini_atmos.F |
94 |
DIC_INI_ATMOS |
WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2 |
|
./pkg/dic/dic_surfforcing_init.F |
104 |
DIC_SURFFORCING_INIT |
& + aWght*silica1(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, |