| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
859 |
FLUXES |
& EPLANT, A11, A12, A21, A22, F0, |
|
./pkg/fizhi/fizhi_lsm.F |
925 |
FLUXES |
A22 = -( RC(ChNo)*DEDEA(ChNo) + |
|
./pkg/fizhi/fizhi_lsm.F |
929 |
FLUXES |
DETERM = MIN( A12*A21/(A11*A22) - 1., -0.1 _d 0) |
|
./pkg/fizhi/fizhi_lsm.F |
930 |
FLUXES |
DEA = ( Q0*A21 - A11*F0 ) / ( DETERM * A11*A22 ) |
|
./pkg/fizhi/fizhi_lsm.F |
940 |
FLUXES |
DENOM = DETERM * A11*A22 |
|
./pkg/fizhi/fizhi_lsm.F |
944 |
FLUXES |
A22 = 1. |
|
./pkg/fizhi/fizhi_lsm.F |
946 |
FLUXES |
DEA = ( Q0*A21 - A11*F0 ) / ( A12*A21 - A11*A22 ) |
|
./pkg/fizhi/fizhi_lsm.F |
956 |
FLUXES |
DENOM = A12 * A21 - A11*A22 |
|
./pkg/fizhi/fizhi_lsm.F |
982 |
FLUXES |
DEA=(F0-A21*DTC)/A22 |
|
./pkg/seaice/SEAICE_PARAMS.h |
231 |
NO PROCEDURE |
_RL OCEAN_drag, LSR_ERROR, DIFF1, A22 |
|
./pkg/seaice/SEAICE_PARAMS.h |
257 |
NO PROCEDURE |
& OCEAN_drag, LSR_ERROR, DIFF1, A22, |
|
./pkg/seaice/seaice_readparms.F |
252 |
SEAICE_READPARMS |
A22 = 0.15 _d 0 |
|
./pkg/seaice/seaice_readparms.F |
82 |
SEAICE_READPARMS |
& LSR_ERROR, DIFF1, A22, SEAICEuseFREEDRIFT, |
|
./pkg/seaice/seaice_summary.F |
259 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( A22 ,INDEX_NONE, |
|
./verification/global_ocean.cs32x15/code_ad/SEAICE_PARAMS.h |
231 |
NO PROCEDURE |
_RL OCEAN_drag, LSR_ERROR, DIFF1, A22 |
|
./verification/global_ocean.cs32x15/code_ad/SEAICE_PARAMS.h |
257 |
NO PROCEDURE |
& OCEAN_drag, LSR_ERROR, DIFF1, A22, |