| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2625 |
SRCLOUDS |
_RL ratio, temp, elocp |
|
./pkg/fizhi/fizhi_moist.F |
2657 |
SRCLOUDS |
ratio = alpha*(rh-rhcrit)/offset |
|
./pkg/fizhi/fizhi_moist.F |
2659 |
SRCLOUDS |
if(cloud(i,L).eq. 0.0 .and. ratio.gt.0.0 ) then |
|
./pkg/fizhi/fizhi_moist.F |
2660 |
SRCLOUDS |
cloud(i,L) = min( ratio,1.0 _d 0) |
|
./pkg/kpp/kpp_routines.F |
860 |
RI_IWMIX |
_RL ratio |
|
./pkg/kpp/kpp_routines.F |
932 |
RI_IWMIX |
ratio = min ( (BVSQcon - Rig) / BVSQcon, c1 ) |
|
./pkg/kpp/kpp_routines.F |
933 |
RI_IWMIX |
fcon = c1 - ratio * ratio |
|
./pkg/kpp/kpp_routines.F |
939 |
RI_IWMIX |
ratio = min ( Rig / Riinfty , c1 ) |
|
./pkg/kpp/kpp_routines.F |
940 |
RI_IWMIX |
fRi = c1 - ratio * ratio |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1128 |
ECCO_COST_WEIGHTS |
wtheta(k,bi,bj) = ratio/wtheta(k,bi,bj)/wtheta(k,bi,bj)/2. |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1133 |
ECCO_COST_WEIGHTS |
wsalt(k,bi,bj) = ratio/wsalt(k,bi,bj)/wsalt(k,bi,bj)/2. |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1146 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1154 |
ECCO_COST_WEIGHTS |
& ratio/wobcss(k,iobcs)/wobcss(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1162 |
ECCO_COST_WEIGHTS |
& ratio/wobcsw(k,iobcs)/wobcsw(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1170 |
ECCO_COST_WEIGHTS |
& ratio/wobcse(k,iobcs)/wobcse(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
244 |
ECCO_COST_WEIGHTS |
& , ratio |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
341 |
ECCO_COST_WEIGHTS |
wsaltLev(i,j,k,bi,bj)=ratio/(wsalt(k,bi,bj) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
380 |
ECCO_COST_WEIGHTS |
wthetaLev(i,j,k,bi,bj)=ratio/(wtheta(k,bi,bj) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
425 |
ECCO_COST_WEIGHTS |
wsalt2(i,j,k,bi,bj)=ratio/(wsalt(k,bi,bj) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
471 |
ECCO_COST_WEIGHTS |
wtheta2(i,j,k,bi,bj) = ratio/(wtheta(k,bi,bj) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
68 |
ECCO_COST_WEIGHTS |
_RL ratio |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1121 |
ECCO_COST_WEIGHTS |
wtheta(k,bi,bj) = ratio/wtheta(k,bi,bj)/wtheta(k,bi,bj)/2. |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1126 |
ECCO_COST_WEIGHTS |
wsalt(k,bi,bj) = ratio/wsalt(k,bi,bj)/wsalt(k,bi,bj)/2. |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1139 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1147 |
ECCO_COST_WEIGHTS |
& ratio/wobcss(k,iobcs)/wobcss(k,iobcs) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1155 |
ECCO_COST_WEIGHTS |
& ratio/wobcsw(k,iobcs)/wobcsw(k,iobcs) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1163 |
ECCO_COST_WEIGHTS |
& ratio/wobcse(k,iobcs)/wobcse(k,iobcs) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
242 |
ECCO_COST_WEIGHTS |
& , ratio |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
339 |
ECCO_COST_WEIGHTS |
wsaltLev(i,j,k,bi,bj)=ratio/(wsalt(k,bi,bj) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
378 |
ECCO_COST_WEIGHTS |
wthetaLev(i,j,k,bi,bj)=ratio/(wtheta(k,bi,bj) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
423 |
ECCO_COST_WEIGHTS |
wsalt2(i,j,k,bi,bj)=ratio/(wsalt(k,bi,bj) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
469 |
ECCO_COST_WEIGHTS |
wtheta2(i,j,k,bi,bj) = ratio/(wtheta(k,bi,bj) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
67 |
ECCO_COST_WEIGHTS |
_RL ratio |
|
./pkg/ecco/ecco_cost_weights.F |
1788 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1796 |
ECCO_COST_WEIGHTS |
& ratio/wobcss(k,iobcs)/wobcss(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1804 |
ECCO_COST_WEIGHTS |
& ratio/wobcsw(k,iobcs)/wobcsw(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1812 |
ECCO_COST_WEIGHTS |
& ratio/wobcse(k,iobcs)/wobcse(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
263 |
ECCO_COST_WEIGHTS |
read(gwunit,*) ratio |
|
./pkg/ecco/ecco_cost_weights.F |
299 |
ECCO_COST_WEIGHTS |
wtheta(k,bi,bj) = ratio/wtheta(k,bi,bj)/wtheta(k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
304 |
ECCO_COST_WEIGHTS |
wsalt(k,bi,bj) = ratio/wsalt(k,bi,bj)/wsalt(k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
69 |
ECCO_COST_WEIGHTS |
_RL ratio |