| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_bulkformulae.F |
243 |
EXF_BULKFORMULAE |
zwln = LOG(hu/zref) |
|
./pkg/exf/exf_bulkformulae.F |
244 |
EXF_BULKFORMULAE |
ztln = LOG(ht/zref) |
|
./pkg/exf/exf_bulkformulae.F |
406 |
EXF_BULKFORMULAE |
& ( LOG( (exf_one + exf_two*x + xsq)* |
|
./pkg/exf/exf_bulkformulae.F |
420 |
EXF_BULKFORMULAE |
& ( exf_two*LOG(exf_half*(exf_one+xsq)) ) |
|
./pkg/exf/exf_interp.F |
398 |
EXF_INTERP |
nLoop = 1 + INT( LOG(tmpVar)/LOG(2. _d 0) ) |
|
./pkg/exf/exf_interp_uv.F |
424 |
EXF_INTERP_UV |
nLoop = 1 + INT( LOG(tmpVar)/LOG(2. _d 0) ) |
|
./pkg/fizhi/fizhi_lsm.F |
761 |
RCUNST |
RCINV = ( DUM1*LOG(DUM2) + ZK*ZLAI(ChNo) ) / DUM3 |
|
./pkg/fizhi/fizhi_turb.F |
2460 |
SFCFLX |
VPSIM(I) = LOG( VHZ(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3089 |
PSI |
CM8 = 6. * LOG(CM8ARG) |
|
./pkg/fizhi/fizhi_turb.F |
3156 |
PSI |
ARG1(I) = LOG( ARG1(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3190 |
PSI |
PSI2(I) = LOG( ARG1(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3264 |
PSI |
ARG1(I) = LOG( ARG1(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3285 |
PSI |
ARG1(I) = LOG( Z2ZWM(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3317 |
PSI |
ARG1(I) = LOG( ARG1(I) ) |
|
./pkg/fizhi/update_earth_exports.F |
666 |
SIBALB |
& + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
|
./pkg/fizhi/update_earth_exports.F |
674 |
SIBALB |
& + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
|
./pkg/kpp/kpp_forcing_surf.F |
344 |
KPP_FORCING_SURF |
& ( rF(3) * LOG ( rF(3) / rF(2) ) / |
|
./pkg/kpp/kpp_forcing_surf.F |
369 |
KPP_FORCING_SURF |
& ( LOG ( zRef(i,j) / rF(2) ) + |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
150 |
SEAICE_BOTTOMDRAG_COEFFS |
& * LOG(EXP( fac*(hActual - hCrit) ) + 1. _d 0)*rFac |
|
./pkg/seaice/seaice_solve4temp.F |
171 |
SEAICE_SOLVE4TEMP |
lnTEN = LOG(10.0 _d 0) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
368 |
SHELFICE_THERMODYNAMICS |
gammaTurb = LOG( ustarSq * shiZetaN * etastar**2 |
|
./pkg/thsice/thsice_get_exf.F |
177 |
THSICE_GET_EXF |
zwln = LOG(hu/zref) |
|
./pkg/thsice/thsice_get_exf.F |
178 |
THSICE_GET_EXF |
ztln = LOG(ht/zref) |
|
./pkg/thsice/thsice_get_exf.F |
379 |
THSICE_GET_EXF |
& *( LOG( (exf_one + exf_two*x + xsq) |
|
./pkg/thsice/thsice_get_exf.F |
391 |
THSICE_GET_EXF |
& *exf_two*LOG( exf_half*(exf_one+xsq) ) |
|
./verification/hs94.128x64x5/code/external_forcing.F |
195 |
EXTERNAL_FORCING_T |
term2=10. _d 0*LOG(termP/atm_po) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
260 |
APPLY_FORCING_T |
term2 = 10. _d 0*LOG(termP/atm_po) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
260 |
APPLY_FORCING_T |
term2 = 10. _d 0*LOG(termP/atm_po) |
|
./model/src/port_rand.F |
172 |
PORT_RANARR |
t = SQRT(-2.0*LOG(xs)/xs) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
260 |
APPLY_FORCING_T |
term2 = 10. _d 0*LOG(termP/atm_po) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
260 |
APPLY_FORCING_T |
term2 = 10. _d 0*LOG(termP/atm_po) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
260 |
APPLY_FORCING_T |
term2 = 10. _d 0*LOG(termP/atm_po) |
|
./pkg/aim_v23/aim_dyn2aim.F |
257 |
AIM_DYN2AIM |
WVSurf(I2,myThid) = (LOG(PSA(I2))-SIGL(k))*WVI(k-1,1) |
|
./pkg/aim_v23/phy_driver.F |
235 |
PHY_DRIVER |
& + aim_abs_pCO2*LOG( aim_pCO2/aim_ref_pCO2 ) |
|
./pkg/aim_v23/phy_inphys.F |
83 |
INPHYS |
SIGL(K) = LOG(SIG(K)) |
|
./pkg/aim_v23/phy_inphys.F |
98 |
INPHYS |
WVI(K,2)=(LOG(SIGH(K))-SIGL(K))*WVI(K,1) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
140 |
BULKF_FORMULA_LAY |
zwln = LOG(zwd/zref) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
141 |
BULKF_FORMULA_LAY |
ztln = LOG(zth/zref) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
198 |
BULKF_FORMULA_LAY |
& ( LOG( (one + two*x + xsq)*(one+xsq)*.125 ) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
203 |
BULKF_FORMULA_LAY |
& + (one-stable)*( two*LOG(half*(one+xsq)) ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
131 |
CHEAPAML_COARE3_FLUX |
u10 = Du*LOG(10. _d 0/zo)/LOG(zu/zo) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
134 |
CHEAPAML_COARE3_FLUX |
Cd10= (xkar/LOG(10. _d 0/zo10))**2 |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
138 |
CHEAPAML_COARE3_FLUX |
Cd = (xkar/LOG(zu/zo10))**2 |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
145 |
CHEAPAML_COARE3_FLUX |
Ct=xkar/LOG(zt/zot10) ! Temperature transfer coefficient |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
164 |
CHEAPAML_COARE3_FLUX |
usr= Du*xkar/(LOG(zu/zo10)-psiu(zu/L10)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
165 |
CHEAPAML_COARE3_FLUX |
tsr=-(Dt)*xkar/(LOG(zt/zot10)-psit(zt/L10)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
166 |
CHEAPAML_COARE3_FLUX |
qsr=-(Dq)*xkar/(LOG(zq/zot10)-psit(zq/L10)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
198 |
CHEAPAML_COARE3_FLUX |
& ' ln(zu/zo),psu,diff,zL*=', LOG(zu/zo), psu, LOG(zu/zo)-psu, |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
214 |
CHEAPAML_COARE3_FLUX |
usr=Du*xkar/(LOG(zu/zo)-psiu(zu/L)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
215 |
CHEAPAML_COARE3_FLUX |
tsr=-(Dt)*xkar/(LOG(zt/zot)-psit(zt/L)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
216 |
CHEAPAML_COARE3_FLUX |
qsr=-(Dq)*xkar/(LOG(zq/zoq)-psit(zq/L)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
234 |
CHEAPAML_COARE3_FLUX |
q100=qs+qsr*(LOG(100. _d 0/zoq)-psit(100. _d 0/L)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
239 |
CHEAPAML_COARE3_FLUX |
& *xkar/(LOG(zt/zot10)-psit(zt/L10)) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
245 |
CHEAPAML_COARE3_FLUX |
dEvapdTs = rhoa*usr*( xkar/(LOG(zq/zoq)-psit(zq/L)) ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
294 |
CHEAPAML_COARE3_FLUX |
psik=2.*LOG((1.+x)/2.)+LOG((1.+x*x)/2.)-2.*ATAN(x)+2.*ATAN(oneRL) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
296 |
CHEAPAML_COARE3_FLUX |
psic = 1.5*LOG((1.+y+y*y)/3.) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
332 |
CHEAPAML_COARE3_FLUX |
psik = 2.*LOG((1.+x)/2.) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
334 |
CHEAPAML_COARE3_FLUX |
psic = 1.5*LOG((1.+y+y*y)/3.) |