| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1257 |
SMFAC |
_RL RCUNTD, RHOAIR, CONST, DEF, D12, DR2, |
|
./pkg/fizhi/fizhi_lsm.F |
1265 |
SMFAC |
RHOAIR = PSUR(ChNo) * 100. / ( RGAS*TC(ChNo) ) |
|
./pkg/fizhi/fizhi_lsm.F |
1268 |
SMFAC |
CONST = RHOAIR * EPSILON / PSUR(ChNo) |
|
./pkg/fizhi/fizhi_lsm.F |
858 |
FLUXES |
_RL HLWTC, CDEEPS, Q0, RHOAIR, CONST, DHLWTC, |
|
./pkg/fizhi/fizhi_lsm.F |
873 |
FLUXES |
RHOAIR = PSUR(ChNo) * 100. / (RGAS * TC(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
874 |
FLUXES |
CONST = RHOAIR * EPSILON / PSUR(ChNo) |
|
./pkg/seaice/dynsolver.F |
135 |
DYNSOLVER |
DAIRN(I,J,bi,bj)=RHOAIR*OCEAN_drag |
|
./pkg/seaice/dynsolver.F |
145 |
DYNSOLVER |
& RHOAIR*(SEAICE_drag_south*AAA*AREA(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
150 |
DYNSOLVER |
& RHOAIR*(SEAICE_drag*AAA*AREA(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
57 |
DYNSOLVER |
_RL RHOICE, RHOAIR |
|
./pkg/seaice/dynsolver.F |
67 |
DYNSOLVER |
RHOAIR=SEAICE_rhoAir |