| 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 |
339 |
OBCS_FIELDS_LOAD |
aWght = 0. _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 |
525 |
OBCS_FIELDS_LOAD |
& +aWght*OBEeta1(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 |
551 |
OBCS_FIELDS_LOAD |
& +aWght*OBWeta1(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 |
577 |
OBCS_FIELDS_LOAD |
& +aWght*OBNeta1(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 |
603 |
OBCS_FIELDS_LOAD |
& +aWght*OBSeta1(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 |
693 |
OBCS_TIME_INTERP_XZ |
& +aWght*fld1(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 |
744 |
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 |
105 |
OFFLINE_FIELDS_LOAD |
& intime0,intime1, ' ; Wght=', bWght, aWght |
|
./pkg/offline/offline_fields_load.F |
356 |
OFFLINE_FIELDS_LOAD |
offline_Wght(2,bi,bj) = aWght |
|
./pkg/offline/offline_fields_load.F |
361 |
OFFLINE_FIELDS_LOAD |
& + aWght*uvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
363 |
OFFLINE_FIELDS_LOAD |
& + aWght*vvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
365 |
OFFLINE_FIELDS_LOAD |
& + aWght*wvel1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
367 |
OFFLINE_FIELDS_LOAD |
& + aWght*tave1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
369 |
OFFLINE_FIELDS_LOAD |
& + aWght*save1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
372 |
OFFLINE_FIELDS_LOAD |
& + aWght*gmkx1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
374 |
OFFLINE_FIELDS_LOAD |
& + aWght*gmky1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
376 |
OFFLINE_FIELDS_LOAD |
& + aWght*gmkz1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
381 |
OFFLINE_FIELDS_LOAD |
& + aWght*conv1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
384 |
OFFLINE_FIELDS_LOAD |
& + aWght*kdfs1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
388 |
OFFLINE_FIELDS_LOAD |
& + aWght*kght1(i,j,k,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
427 |
OFFLINE_FIELDS_LOAD |
& + aWght*sflx1(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 |
59 |
OFFLINE_GET_SURFFORCING |
aWght = offline_Wght(2,bi,bj) |
|
./pkg/offline/offline_get_surfforcing.F |
67 |
OFFLINE_GET_SURFFORCING |
& + aWght*sflx1(i,j,bi,bj) |
|
./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 |
|
./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/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 |
247 |
CHEAPAML_FIELDS_LOAD |
O intimeP, intime0, intime1, bWght, aWght, |
|
./pkg/cheapaml/cheapaml_fields_load.F |
378 |
CHEAPAML_FIELDS_LOAD |
& + aWght*trair1(i,j,bi,bj) !+273.15 |
|
./pkg/cheapaml/cheapaml_fields_load.F |
380 |
CHEAPAML_FIELDS_LOAD |
& + aWght*qrair1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
382 |
CHEAPAML_FIELDS_LOAD |
& + aWght*uWind1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
384 |
CHEAPAML_FIELDS_LOAD |
& + aWght*vWind1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
386 |
CHEAPAML_FIELDS_LOAD |
& + aWght*solar1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
389 |
CHEAPAML_FIELDS_LOAD |
& + aWght*ustress1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
391 |
CHEAPAML_FIELDS_LOAD |
& + aWght*vstress1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
395 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheaph1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
399 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheapcl1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
403 |
CHEAPAML_FIELDS_LOAD |
& + aWght*cheaplw1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
407 |
CHEAPAML_FIELDS_LOAD |
& + aWght*CheaptracerR1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
412 |
CHEAPAML_FIELDS_LOAD |
& + aWght*wavesh1(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
416 |
CHEAPAML_FIELDS_LOAD |
& + aWght*wavesp1(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 |
86 |
DIC_ATMOS |
aWght = FLOAT(myIter-dic_int3) |
|
./pkg/dic/dic_atmos.F |
88 |
DIC_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_atmos.F |
89 |
DIC_ATMOS |
IF (aWght.GT.1. _d 0) THEN |
|
./pkg/dic/dic_atmos.F |
91 |
DIC_ATMOS |
aWght=aWght-1. _d 0 |
|
./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 |
173 |
DIC_FIELDS_LOAD |
& + aWght*dicwind1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
186 |
DIC_FIELDS_LOAD |
& + aWght*atmosp1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
195 |
DIC_FIELDS_LOAD |
& + aWght*silica1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
203 |
DIC_FIELDS_LOAD |
& + aWght*ice1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
213 |
DIC_FIELDS_LOAD |
& + aWght*par1(i,j,bi,bj) |
|
./pkg/dic/dic_fields_load.F |
229 |
DIC_FIELDS_LOAD |
& + aWght*feinput1(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 |
101 |
DIC_INI_ATMOS |
aWght=aWght-1. _d 0 |
|
./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 |
96 |
DIC_INI_ATMOS |
aWght = FLOAT(myIter-dic_int3) |
|
./pkg/dic/dic_ini_atmos.F |
98 |
DIC_INI_ATMOS |
aWght = 0.5 _d 0 + aWght/bWght - FLOAT(ntim-1) |
|
./pkg/dic/dic_ini_atmos.F |
99 |
DIC_INI_ATMOS |
IF (aWght.GT.1. _d 0) THEN |
|
./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, |