| ACALC.f90#112 | HSP = HS |
| CBLPR3.f90#46 | DHP3 = HEDHH*(ZI-HSP) ! 17138 |
| #48 | DHP3 = 0.75*(ZI-HSP)*HEDHH + 0.5*(ZI-HSP) ! 191656 |
| CBLPRN.f90#43 | RSUBH = BETA2*(ZI-HSP) |
| CENTROID.f90#39 | HTEFF = AMIN1(HSP+DHP1,ZI) |
| #41 | HTEFF = HSP !6646014 |
| #49 | DELZ = ZMIDMX - AMIN1(HSP+DHCRIT,ZI) |
| #51 | CENTER = AMIN1(HSP+DHCRIT,ZI) + FRAC*DELZ |
| #64 | CENTER = HSP |
| #68 | CENTER = HSP ! 33110K |
| DELTAH.f90#79 | 50 ZPLM = HSP + 0.5*DHP !1800404 |
| DISTF.f90#44 | DELHNN = 1.2*XLN**0.6*(HSP+1.2*XLN)**0.4 |
| #66 | IF ( HSP.LT.1.25*ZI ) THEN ! 0 |
| #67 | DHFAER = MIN(DHFAER,1.25*ZI-HSP) ! 0 |
| EVALCK.f90#87 | HEMAX(INDEX) = HSP + DHP3 |
| #102 | HEMAX(INDEX) = HSP + DHP1 |
| HEFF.f90#50 | HE = HSP + DHP ! 33119K |
| #60 | HED1 = HSP + DHP1 + (ASUB1*WSTAR*XARG/UEFFD) ! 10690K |
| #61 | HED2 = HSP + DHP1 + (ASUB2*WSTAR*XARG/UEFFD) |
| #66 | HEN1 = HSP + DHP1 - DHP2 + (ASUB1*WSTAR*XARG/UEFFN) |
| #67 | HEN2 = HSP + DHP1 - DHP2 + (ASUB2*WSTAR*XARG/UEFFN) |
| #71 | HE3 = HSP + DHP3 |
| MAIN1.f90#648 | REAL :: HE , HSP , HEFLAT , HTER , HEMWAK , HEDHH , ZB , ZM , & |
| OCALC.f90#175 | HSP = HS |
| PCALC.f90#170 | HSP = HS ! 0 |
| #173 | HSP = HSPRIM(US,VS,HS,DS) ! 9132 |
| #193 | 50 ZPLM = HSP + 0.5*DHFAER ! 12490 |
| #320 | HE = HSP + DHCRIT ! 0 |
| #324 | HED1 = HSP + DHCRIT ! 0 |
| PENFCT.f90#57 | PSUBS = FB/(UP*BVZI2*(ZI-HSP)*(ZI-HSP)*(ZI-HSP)) |
| PLUME_VOL.f90#98 | HSP = HS |
| #129 | HSP = HS ! 0 |
| #132 | HSP = HSPRIM(US,VS,HS,DS) ! 0 |
| #148 | 50 ZPLM = HSP + 0.5*DHFAER ! 0 |
| VCALC.f90#103 | HSP = HS |
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