| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_readparms.F |
211 |
SEAICE_READPARMS |
SEAICE_rhoAir = atmrho |
|
./pkg/thsice/thsice_get_exf.F |
242 |
THSICE_GET_EXF |
ssq(i,j) = tmpbulk/atmrho |
|
./pkg/thsice/thsice_get_exf.F |
403 |
THSICE_GET_EXF |
tau = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_exf.F |
431 |
THSICE_GET_EXF |
tau = atmrho*exf_iceCe*wsm |
|
./pkg/thsice/thsice_get_exf.F |
434 |
THSICE_GET_EXF |
hsLocal = atmcp*atmrho*exf_iceCh*wsm*deltap(i,j) |
|
./pkg/thsice/thsice_get_exf.F |
444 |
THSICE_GET_EXF |
dfshdT = -atmcp*atmrho*exf_iceCh*wsm |
|
./pkg/exf/EXF_CONSTANTS.h |
135 |
NO PROCEDURE |
_RL atmrho |
|
./pkg/exf/EXF_CONSTANTS.h |
165 |
NO PROCEDURE |
& atmrho, |
|
./pkg/exf/exf_bulkformulae.F |
291 |
EXF_BULKFORMULAE |
ssq = saltsat*tmpbulk/atmrho |
|
./pkg/exf/exf_bulkformulae.F |
317 |
EXF_BULKFORMULAE |
ustar(i,j) = sqrt(windStress/atmrho) |
|
./pkg/exf/exf_bulkformulae.F |
319 |
EXF_BULKFORMULAE |
tau(i,j) = sqrt(windStress*atmrho) |
|
./pkg/exf/exf_bulkformulae.F |
439 |
EXF_BULKFORMULAE |
tau(i,j) = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/exf/exf_bulkformulae.F |
518 |
EXF_BULKFORMULAE |
ustress(i,j,bi,bj) = atmrho*tmpbulk*wspeed(i,j,bi,bj)* |
|
./pkg/exf/exf_bulkformulae.F |
520 |
EXF_BULKFORMULAE |
vstress(i,j,bi,bj) = atmrho*tmpbulk*wspeed(i,j,bi,bj)* |
|
./pkg/exf/exf_readparms.F |
249 |
EXF_READPARMS |
atmrho = 1.200 _d 0 |
|
./pkg/exf/exf_readparms.F |
81 |
EXF_READPARMS |
& hu, ht, umin, atmrho, atmcp, cen2kel, gravity_mks, |
|
./pkg/exf/exf_summary.F |
115 |
EXF_SUMMARY |
CALL WRITE_0D_RL( atmrho, INDEX_NONE, 'atmrho =', |
|
./pkg/exf/exf_wind.F |
152 |
EXF_WIND |
recip_sqrtRhoA = 1. _d 0 / SQRT(atmrho) |