| CRITDS.f90#52 | REAL A , AC4 , B , B2 , C , DETER , HBOT , HTOP , LS(MXGLVL) , & |
| #53 | & RS(MXGLVL) , XN2(MXGLVL) , N2 , DWS , DWS2 , ZMID |
| #72 | CALL LOCATE(GRIDHT,1,MXGLVL,HHILL,NDX4HC) ! 0 |
| DELTAH.f90#84 | CALL LOCATE(GRIDHT,1,MXGLVL,ZPLM,NDXZPL) |
| GRDDEN.f90#52 | DO I = 1 , MXGLVL |
| GRDEPS.f90#36 | DO I = 1 , MXGLVL |
| GRDPT.f90#58 | CALL LOCATE(GRIDHT,1,MXGLVL,TREFHT,NBELOW) ! 3044 |
| #84 | DO L = NBELOW + 1 , MXGLVL ! 3044 |
| GRDPTG.f90#66 | DO WHILE ( GINDEX.LE.MXGLVL ) |
| #189 | DO NDX = 1 , MXGLVL ! 3044 |
| GRDPTURB.f90#56 | CALL LOCATE(GRIDHT,1,MXGLVL,TREFHT,NBELOW) ! 0 |
| #80 | DO L = NBELOW + 1 , MXGLVL ! 0 |
| GRDSV.f90#61 | DO WHILE ( GINDEX.LE.MXGLVL ) |
| GRDSW.f90#64 | DO WHILE ( GINDEX.LE.MXGLVL ) |
| GRDURBAN.f90#39 | DO I = 1 , MXGLVL |
| GRDWD.f90#66 | DO WHILE ( GINDEX.LE.MXGLVL ) |
| GRDWS.f90#61 | DO WHILE ( GINDEX.LE.MXGLVL ) |
| IBLVAL.f90#68 | CALL LOCATE(GRIDHT,1,MXGLVL,HTEFF,NDXEFF) |
| #105 | CALL LOCATE(GRIDHT,1,MXGLVL,HTEFF,NDXEFF) |
| #138 | CALL LOCATE(GRIDHT,1,MXGLVL,HTEFF,NDXEFF) |
| #214 | CALL LOCATE(GRIDHT,1,MXGLVL,ZHI,NDXBHI) ! 33119K |
| #215 | CALL LOCATE(GRIDHT,1,MXGLVL,ZLO,NDXBLO) |
| #217 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI,UEFF) |
| #218 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSV,ZLO,NDXALO,ZHI,NDXBHI,SVEFF) |
| #219 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSW,ZLO,NDXALO,ZHI,NDXBHI,SWEFF) |
| #220 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDTG,ZLO,NDXALO,ZHI,NDXBHI,TGEFF) |
| #221 | IF ( PVMRM ) CALL ANYAVG(MXGLVL,GRIDHT,GRIDEPS,ZLO,NDXALO,ZHI, & |
| #273 | CALL LOCATE(GRIDHT,1,MXGLVL,ZHI,NDXBHI) ! 208794 |
| #274 | CALL LOCATE(GRIDHT,1,MXGLVL,ZLO,NDXBLO) |
| #276 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI, & |
| #278 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSV,ZLO,NDXALO,ZHI,NDXBHI, & |
| #280 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSW,ZLO,NDXALO,ZHI,NDXBHI, & |
| #282 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDTG,ZLO,NDXALO,ZHI,NDXBHI, & |
| #284 | IF ( PVMRM ) CALL ANYAVG(MXGLVL,GRIDHT,GRIDEPS,ZLO,NDXALO, & |
| #345 | CALL LOCATE(GRIDHT,1,MXGLVL,ZHI,NDXBHI) !6950906 |
| #346 | CALL LOCATE(GRIDHT,1,MXGLVL,ZLO,NDXBLO) |
| #348 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI, & |
| #350 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSV,ZLO,NDXALO,ZHI,NDXBHI, & |
| #352 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSW,ZLO,NDXALO,ZHI,NDXBHI, & |
| #354 | IF ( PVMRM ) CALL ANYAVG(MXGLVL,GRIDHT,GRIDEPS,ZLO, & |
| #359 | CALL LOCATE(GRIDHT,1,MXGLVL,HTEFF,NDXEFF) |
| MAIN1.f90#37 | & MXGLVL = 87 |
| #522 | REAL :: GRIDHT(MXGLVL) , GRIDWD(MXGLVL) , GRIDWS(MXGLVL) , & |
| #523 | & GRIDSW(MXGLVL) , GRIDSV(MXGLVL) , GRIDTG(MXGLVL) , & |
| #524 | & GRIDPT(MXGLVL) , GRIDRHO(MXGLVL) , GRIDEPS(MXGLVL) |
| #525 | REAL :: GRDSWU(MXGLVL) , GRDSVU(MXGLVL) , GRDTGU(MXGLVL) , & |
| #526 | & GRDSWR(MXGLVL) , GRDSVR(MXGLVL) , GRDTGR(MXGLVL) , & |
| #527 | & GRDPTU(MXGLVL) , GRDPTR(MXGLVL) |
| METDEB.f90#64 | DO I = MXGLVL , 1 , -1 |
| METINI.f90#174 | CALL ZIAVER(MXGLVL,GRIDHT,GRIDSV,ZI,NDX4ZI,SVAVG,SVATZI) |
| #175 | CALL ZIAVER(MXGLVL,GRIDHT,GRIDSW,ZI,NDX4ZI,SWAVG,SWATZI) |
| #176 | CALL ZIAVER(MXGLVL,GRIDHT,GRIDWS,ZI,NDX4ZI,UAVG,UATZI) |
| OCALC.f90#64 | CALL LOCATE(GRIDHT,1,MXGLVL,10.,NDXR) ! 0 |
| PCALC.f90#198 | CALL LOCATE(GRIDHT,1,MXGLVL,ZPLM,NDXZPL) |
| #348 | CALL LOCATE(GRIDHT,1,MXGLVL,ZMID,NDXZMID) |
| #394 | CALL LOCATE(GRIDHT,1,MXGLVL,DSBH,NDXBH) |
| PLUME_VOL.f90#153 | CALL LOCATE(GRIDHT,1,MXGLVL,ZPLM,NDXZPL) |
| PRMCALC.f90#105 | CALL LOCATE(GRIDHT,1,MXGLVL,ZHI,NDXBHI) |
| #106 | CALL LOCATE(GRIDHT,1,MXGLVL,ZLO,NDXBLO) |
| #108 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDWS,ZLO,NDXALO,ZHI,NDXBHI,UEFF) |
| #109 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSV,ZLO,NDXALO,ZHI,NDXBHI,SVEFF) |
| #110 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDSW,ZLO,NDXALO,ZHI,NDXBHI,SWEFF) |
| #111 | CALL ANYAVG(MXGLVL,GRIDHT,GRIDTG,ZLO,NDXALO,ZHI,NDXBHI,TGEFF) |
| PVMRM_CALC.f90#176 | CALL LOCATE(GRIDHT,1,MXGLVL,ZCORR,NDXBLZ) |
| REFL_HT.f90#42 | CALL LOCATE(GRIDHT,1,MXGLVL,HEARG,NDXHE) |
| SET_METDATA.f90#163 | DO GINDEX = 1 , MXGLVL ! 3044 |
| #185 | CALL LOCATE(GRIDHT,1,MXGLVL,ZI,NDX4ZI) ! 3044 |
| #206 | IF ( NDX4ZI.LT.MXGLVL ) THEN |
| #215 | UATZI = GRIDWS(MXGLVL) ! 0 |
| #216 | PTATZI = GRIDPT(MXGLVL) |
| #243 | IF ( NDX4ZI.LT.MXGLVL ) THEN |
| #251 | SVATZI = GRIDSV(MXGLVL) ! 0 |
| #252 | SWATZI = GRIDSW(MXGLVL) |
| SIGZ.f90#58 | CALL LOCATE(GRIDHT,1,MXGLVL,HE,NDXZHE) |
| SIGZPR.f90#45 | CALL LOCATE(GRIDHT,1,MXGLVL,ZARG,NDXZHE) |
| ZMET.f90#134 | CALL LOCATE(GRIDHT,1,MXGLVL,Z,NDXBLZ) !6443782 |
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