File |
Line number |
Procedure |
Code |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
117 |
EXTERNAL_FORCING_V |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
120 |
EXTERNAL_FORCING_V |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
131 |
EXTERNAL_FORCING_V |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
49 |
EXTERNAL_FORCING_U |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.1x64x5/code_ad/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.1x64x5/code/external_forcing.F |
117 |
EXTERNAL_FORCING_V |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.1x64x5/code/external_forcing.F |
120 |
EXTERNAL_FORCING_V |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.1x64x5/code/external_forcing.F |
131 |
EXTERNAL_FORCING_V |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.1x64x5/code/external_forcing.F |
49 |
EXTERNAL_FORCING_U |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.1x64x5/code/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.1x64x5/code/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
117 |
EXTERNAL_FORCING_V |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
120 |
EXTERNAL_FORCING_V |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
131 |
EXTERNAL_FORCING_V |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
49 |
EXTERNAL_FORCING_U |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.cs-32x32x5/code/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.128x64x5/code/external_forcing.F |
117 |
EXTERNAL_FORCING_V |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.128x64x5/code/external_forcing.F |
120 |
EXTERNAL_FORCING_V |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.128x64x5/code/external_forcing.F |
131 |
EXTERNAL_FORCING_V |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/hs94.128x64x5/code/external_forcing.F |
49 |
EXTERNAL_FORCING_U |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/hs94.128x64x5/code/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
kF=1. _d 0/86400. _d 0 |
./verification/hs94.128x64x5/code/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
117 |
EXTERNAL_FORCING_V |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
120 |
EXTERNAL_FORCING_V |
kF=1. _d 0/86400. _d 0 |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
131 |
EXTERNAL_FORCING_V |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
49 |
EXTERNAL_FORCING_U |
_RL recip_P0g, termP, kV, kF, sigma_b |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
52 |
EXTERNAL_FORCING_U |
kF=1. _d 0/86400. _d 0 |
./verification/tutorial_held_suarez_cs/code/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
152 |
DO_FIZHI |
_RL kF,sigma_b,ks,ka,deg2rad,pi,atm_po,atm_kappa,termp,kv,kT |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
160 |
DO_FIZHI |
kF=1. _d 0/86400. _d 0 |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
176 |
DO_FIZHI |
kV=kF*MAX( 0. _d 0, (termP-sigma_b)/(1. _d 0-sigma_b) ) |