ACALC.f90#161 | UEFF = US ! 740558 |
#181 | WRITE (DBGUNT,6015) UEFF , SVEFF , SWEFF ! 0 |
#386 | UEFFS(IREC,ISRC) = UEFF |
ACPLUME.f90#76 | COUT = (1.0/UEFF)*(FSUBY*FSUBZ) ! 14517K |
AERCALC.f90#83 | UEFF = US !2021756 |
#105 | WRITE (DBGUNT,6015) UEFF , SVEFF , SWEFF ! 0 |
#112 | WRITE (DBGUNT,6016) UEFF , SVEFF , SWEFF ! 0 |
AER_ACHI.f90#146 | POUT = VDINP*DRYFLUX + WETFLUX*FYARG/UEFF ! 0 |
#154 | POUT = WETFLUX*FYARG/UEFF ! 0 |
AER_PCHI.f90#137 | & QTK*WETFLUX*EMIFAC(ITYP)*FSUBY/UEFF |
#171 | AEROUT(ITYP) = QTK*WETFLUX*EMIFAC(ITYP)*FSUBY/UEFF ! 0 |
CPLUME.f90#74 | COUT = (QTK/UEFF)*(FSUBY*FSUBZ) !2887752 |
DECAY.f90#44 | D = EXP(AMAX1(EXPLIM,-DECOEF*XARG/UEFF)) ! 0 |
EVALCK.f90#66 | UMAX(INDEX) = UEFF ! 0 |
F2INT.f90#34 | UEFF = US ! 0 |
#135 | VWRAP = FSUBZ/UEFF ! 0 |
#217 | VLIFT = FSUBZ/UEFF ! 0 |
IBLVAL.f90#70 | & GRIDWS(NDXEFF+1),HTEFF,UEFF) |
#84 | SVEFF = MAX(SVEFF,SVMIN,0.05*UEFF) |
#85 | UEFF = SQRT(UEFF*UEFF+2.*SVEFF*SVEFF) |
#90 | WRITE (DBGUNT,6014) UEFF , SVEFF , SWEFF ! 0 |
#217 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI,UEFF) |
#228 | SVEFF = MAX(SVEFF,SVMIN,0.05*UEFF) |
#229 | UEFF = SQRT(UEFF*UEFF+2.*SVEFF*SVEFF) |
#234 | WRITE (DBGUNT,6031) UEFF , SVEFF , SWEFF ! 0 |
MAIN1.f90#666 | REAL :: UEFF , SVEFF , SWEFF , TGEFF , UEFFD , SVEFFD , SWEFFD , & |
METDEB.f90#81 | WRITE (DBMUNT,6131) IREC , X , UEFF , SVEFF , SWEFF ! 0 |
METINI.f90#195 | UEFF = US |
OCALC.f90#235 | UEFF = US ! 0 |
#255 | WRITE (DBGUNT,6015) UEFF , SVEFF , SWEFF ! 0 |
#449 | UEFFS(IREC,ISRC) = UEFF |
PCALC.f90#456 | CALL MEANDR(UEFF,SVEFF,FRAN) !1105632 |
#533 | UEFFS(IREC,ISRC) = UEFF |
PRMCALC.f90#108 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI,UEFF) |
#116 | SVEFF = AMAX1(SVEFF,SVMIN,0.05*UEFF) |
#117 | UEFF = SQRT(UEFF*UEFF+2.*SVEFF*SVEFF) |
#123 | WRITE (IOUNIT,*) 'UEFF, TGEFF = ' , UEFF , TGEFF |
PRM_F2INT.f90#72 | VWRAP = FSUBZ/UEFF ! 0 |
#90 | VLIFT = FSUBZ/UEFF ! 0 |
PRM_PCHI.f90#121 | & QTK*WETFLUX*EMIFAC(ITYP)*FSUBY/UEFF |
#132 | & *FSUBY/UEFF |
RELDISP.f90#39 | SRAMB = (A1*SQRT(EPSEFF)*(XARG/UEFF)**1.5) & |
#40 | & /(1.+A2*XARG/(UEFF*TLR)) |
SIGY.f90#55 | SVOVRU = AMAX1(SVUMIN,SVEFF/UEFF) ! 22818K |
#57 | SYAMB = (SVOVRU*XARG)/(1.+XARG/(2.*UEFF*TYEFF))**0.3 |
SIGYPR.f90#37 | SVOVRU = AMAX1(SVUMIN,SVEFF/UEFF) ! 590078 |
#39 | SYAMB = (SVOVRU*XARG)/(1.+XARG/(2.*UEFF*TYEFF))**0.3 |
#44 | SVOVRU = AMAX1(SVUMIN,SVEFF/UEFF) ! 247112 |
SIGZ.f90#53 | TTRAVL = XARG/UEFF ! 50986K |
SIGZPR.f90#40 | TTRAVL = XARG/UEFF ! 164418 |
#91 | SZAD = ALPHAB*SWEFF*XARG/UEFF ! 65808 |
SZSFCL.f90#57 | SZSURF = (RTOF2/RTOFPI)*USTAR*(XARG/UEFF)*(1.0+0.7*XARG/OBULEN)& |
SZSFCLPR.f90#52 | SZSURF = BSUBC*(1.0-10.*(ZARG/ZI))**ALPHA1*(USTAR/UEFF) & |
#53 | & *(USTAR/UEFF)*(XARG*XARG/ABS(OBULEN)) |
#57 | SZSURF = (RTOF2/RTOFPI)*USTAR*(XARG/UEFF)*(1.0+0.7*XARG/OBULEN)& |
VCALC.f90#163 | CALL MEANDR(UEFF,SVEFF,FRAN) !1099872 |
#191 | UEFFS(IREC,ISRC) = UEFF |
VOLCALC.f90#87 | UEFF = US !1972560 |
#105 | WRITE (DBGUNT,6015) UEFF , SVEFF , SWEFF ! 0 |
#112 | WRITE (DBGUNT,6016) UEFF , SVEFF , SWEFF ! 0 |
WAKE_TURB.f90#53 | AMBIZ = SWEFF/UEFF !3843816 |
#54 | AMBIY = SVEFF/UEFF |
WAKE_XA.f90#56 | AMBIZ = SWEFF/UEFF ! 10932 |
#57 | AMBIY = SVEFF/UEFF |
WAKE_XA2.f90#52 | AMBIZ = SWEFF/UEFF ! 502206 |
#53 | AMBIY = SVEFF/UEFF |
HyperKWIC - Version 1.00DD executed at 20:00 on 1 Mar 2018 | Personal or Academic or Evaluation User | Free for Non-Commercial, Non-Government Use