| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_CONSTANTS.h |
29 |
NO PROCEDURE |
_RL exf_one |
|
./pkg/exf/EXF_CONSTANTS.h |
34 |
NO PROCEDURE |
& exf_one = 1.0 _d 0 , |
|
./pkg/exf/exf_bulkformulae.F |
338 |
EXF_BULKFORMULAE |
rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2 |
|
./pkg/exf/exf_bulkformulae.F |
377 |
EXF_BULKFORMULAE |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/exf/exf_bulkformulae.F |
379 |
EXF_BULKFORMULAE |
& qstar(i,j)/(exf_one/humid_fac+aqh(i,j,bi,bj)) |
|
./pkg/exf/exf_bulkformulae.F |
396 |
EXF_BULKFORMULAE |
xsq = SQRT( ABS(exf_one - huol*16. _d 0) ) |
|
./pkg/exf/exf_bulkformulae.F |
399 |
EXF_BULKFORMULAE |
xsq = max(sqrt(abs(exf_one - 16.*huol)),exf_one) |
|
./pkg/exf/exf_bulkformulae.F |
403 |
EXF_BULKFORMULAE |
& +(exf_one-stable)* |
|
./pkg/exf/exf_bulkformulae.F |
404 |
EXF_BULKFORMULAE |
& ( LOG( (exf_one + exf_two*x + xsq)* |
|
./pkg/exf/exf_bulkformulae.F |
405 |
EXF_BULKFORMULAE |
& (exf_one+xsq)*.125 _d 0 ) |
|
./pkg/exf/exf_bulkformulae.F |
412 |
EXF_BULKFORMULAE |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
|
./pkg/exf/exf_bulkformulae.F |
415 |
EXF_BULKFORMULAE |
xsq = max(sqrt(abs(exf_one - 16.*htol)),exf_one) |
|
./pkg/exf/exf_bulkformulae.F |
417 |
EXF_BULKFORMULAE |
psixh = -psim_fac*htol*stable + (exf_one-stable)* |
|
./pkg/exf/exf_bulkformulae.F |
418 |
EXF_BULKFORMULAE |
& ( exf_two*LOG(exf_half*(exf_one+xsq)) ) |
|
./pkg/exf/exf_bulkformulae.F |
426 |
EXF_BULKFORMULAE |
usn = wspeed(i,j,bi,bj)/(exf_one + rdn(i,j)*dzTmp ) |
|
./pkg/exf/exf_bulkformulae.F |
433 |
EXF_BULKFORMULAE |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/exf/exf_bulkformulae.F |
442 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one + rdn(i,j)*dzTmp) |
|
./pkg/exf/exf_bulkformulae.F |
444 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/exf/exf_bulkformulae.F |
456 |
EXF_BULKFORMULAE |
rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2 |
|
./pkg/exf/exf_bulkformulae.F |
460 |
EXF_BULKFORMULAE |
rh = rhn/(exf_one + rhn*(ztln-psixh)/karman) |
|
./pkg/exf/exf_bulkformulae.F |
461 |
EXF_BULKFORMULAE |
re = ren/(exf_one + ren*(ztln-psixh)/karman) |
|
./pkg/exf/exf_set_gen.F |
227 |
EXF_SET_GEN |
& (exf_one - fac) * gen1(i,j,bi,bj) ) |
|
./pkg/exf/exf_set_obcs.F |
109 |
EXF_SET_OBCS_XZ |
& (exf_one - fac) * obcs_xz_1(i,k,bi,bj) |
|
./pkg/exf/exf_set_obcs.F |
216 |
EXF_SET_OBCS_YZ |
& (exf_one - fac) *obcs_yz_1(j,k,bi,bj) |
|
./pkg/exf/exf_set_obcs.F |
319 |
EXF_SET_OBCS_X |
& (exf_one - fac) * obcs_x_1(i,bi,bj) |
|
./pkg/exf/exf_set_obcs.F |
420 |
EXF_SET_OBCS_Y |
& (exf_one - fac) *obcs_y_1(j,bi,bj) |
|
./pkg/exf/exf_set_uv.F |
409 |
EXF_SET_UV |
& (exf_one - fac) * uvec1(i,j,bi,bj) ) |
|
./pkg/exf/exf_set_uv.F |
412 |
EXF_SET_UV |
& (exf_one - fac) * vvec1(i,j,bi,bj) ) |
|
./pkg/thsice/thsice_get_exf.F |
308 |
THSICE_GET_EXF |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/thsice/thsice_get_exf.F |
320 |
THSICE_GET_EXF |
rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2 |
|
./pkg/thsice/thsice_get_exf.F |
353 |
THSICE_GET_EXF |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/thsice/thsice_get_exf.F |
355 |
THSICE_GET_EXF |
& qstar(i,j)/(exf_one/humid_fac+aqh(i,j,bi,bj)) |
|
./pkg/thsice/thsice_get_exf.F |
371 |
THSICE_GET_EXF |
xsq = SQRT( ABS(exf_one - huol*16. _d 0) ) |
|
./pkg/thsice/thsice_get_exf.F |
374 |
THSICE_GET_EXF |
xsq = MAX(SQRT(ABS(exf_one - huol*16. _d 0)),exf_one) |
|
./pkg/thsice/thsice_get_exf.F |
378 |
THSICE_GET_EXF |
& + (exf_one-stable) |
|
./pkg/thsice/thsice_get_exf.F |
379 |
THSICE_GET_EXF |
& *( LOG( (exf_one + exf_two*x + xsq) |
|
./pkg/thsice/thsice_get_exf.F |
380 |
THSICE_GET_EXF |
& *(exf_one+xsq)*0.125 _d 0 ) |
|
./pkg/thsice/thsice_get_exf.F |
384 |
THSICE_GET_EXF |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
|
./pkg/thsice/thsice_get_exf.F |
387 |
THSICE_GET_EXF |
xsq = MAX(SQRT(ABS(exf_one - htol*16. _d 0)),exf_one) |
|
./pkg/thsice/thsice_get_exf.F |
390 |
THSICE_GET_EXF |
& + (exf_one-stable) |
|
./pkg/thsice/thsice_get_exf.F |
391 |
THSICE_GET_EXF |
& *exf_two*LOG( exf_half*(exf_one+xsq) ) |
|
./pkg/thsice/thsice_get_exf.F |
397 |
THSICE_GET_EXF |
& /( exf_one + rdn(i,j)*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
400 |
THSICE_GET_EXF |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/thsice/thsice_get_exf.F |
409 |
THSICE_GET_EXF |
rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2 |
|
./pkg/thsice/thsice_get_exf.F |
413 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one + rdn(i,j)*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
415 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one - rdn(i,j)/karman*psimh ) |
|
./pkg/thsice/thsice_get_exf.F |
417 |
THSICE_GET_EXF |
rh(i,j)= rhn/( exf_one + rhn*(ztln-psixh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
418 |
THSICE_GET_EXF |
re(i,j)= ren/( exf_one + ren*(ztln-psixh)/karman ) |