| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_CONSTANTS.h |
135 |
NO PROCEDURE |
_RL atmrho |
|
./pkg/exf/EXF_CONSTANTS.h |
165 |
NO PROCEDURE |
& atmrho, |
|
./pkg/exf/exf_bulkformulae.F |
305 |
EXF_BULKFORMULAE |
ssq = saltsat*tmpbulk/atmrho |
|
./pkg/exf/exf_bulkformulae.F |
333 |
EXF_BULKFORMULAE |
ustar(i,j) = SQRT(windStress/atmrho) |
|
./pkg/exf/exf_bulkformulae.F |
335 |
EXF_BULKFORMULAE |
tau(i,j) = SQRT(windStress*atmrho) |
|
./pkg/exf/exf_bulkformulae.F |
453 |
EXF_BULKFORMULAE |
tau(i,j) = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/exf/exf_readparms.F |
343 |
EXF_READPARMS |
atmrho = 1.200 _d 0 |
|
./pkg/exf/exf_readparms.F |
91 |
EXF_READPARMS |
& hu, ht, umin, atmrho, atmcp, cen2kel, gravity_mks, |
|
./pkg/exf/exf_summary.F |
127 |
EXF_SUMMARY |
CALL WRITE_0D_RL( atmrho, INDEX_NONE, 'atmrho =', |
|
./pkg/exf/exf_wind.F |
176 |
EXF_WIND |
recip_sqrtRhoA = 1. _d 0 / SQRT(atmrho) |
|
./pkg/exf/exf_wind.F |
263 |
EXF_WIND |
ustress(i,j,bi,bj) = atmrho*tmpbulk*wspeed(i,j,bi,bj) |
|
./pkg/exf/exf_wind.F |
265 |
EXF_WIND |
vstress(i,j,bi,bj) = atmrho*tmpbulk*wspeed(i,j,bi,bj) |
|
./pkg/seaice/seaice_readparms.F |
404 |
SEAICE_READPARMS |
SEAICE_rhoAir = atmrho |
|
./pkg/thsice/thsice_get_exf.F |
255 |
THSICE_GET_EXF |
ssq(i,j) = tmpbulk/atmrho |
|
./pkg/thsice/thsice_get_exf.F |
437 |
THSICE_GET_EXF |
tau = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_exf.F |
470 |
THSICE_GET_EXF |
tau = atmrho*exf_iceCe*wsm |
|
./pkg/thsice/thsice_get_exf.F |
478 |
THSICE_GET_EXF |
hsLocal = atmcp*atmrho*exf_iceCh*wsm*deltap(i,j) |
|
./pkg/thsice/thsice_get_exf.F |
492 |
THSICE_GET_EXF |
dfshdT = -atmcp*atmrho*exf_iceCh*wsm |