| CAVITY_HT.f90#2 | SUBROUTINE CAVITY_HT(H,W,L,R,LC,LR,HR,X,ZCAV,YCAV) |
| #36 | REAL H , W , L , R , HR , LR , LC |
| #70 | ZCAV = HR + 4.*(X-0.5*R)**2*(H-HR)/(R**2) ! 2564 |
| #72 | ZCAV = HR*(1.-((X-0.5*R)/(L+LR-0.5*R))**2)**0.5 ! 7096 |
| CAV_SRC.f90#202 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,XRB,ZCAV,WCAV) ! 3404 |
| NUMRISE.f90#235 | CALL ZSTREAM(HB,WB,XLB,RB,XLR,HR,XB,YB,ZB,DZDX) !2339196 |
| #419 | CALL ZSTREAM(HB,WB,XLB,RB,XLR,HR,XBB,YB,ZB,DZDXB) !2800928 |
| #420 | CALL ZSTREAM(HB,WB,XLB,RB,XLR,HR,XBE,YB,ZB,DZDXE) |
| POSITION.f90#93 | ZCAV = HR + 4.*(X-RBY2)**2*(HB-HR)/(RB**2) ! 5492 |
| #97 | ZCAV = HR*SQRT(1.-((X-RBY2)/(XLB+XLR-RBY2))**2) ! 41060 |
| WAKE_CAV0.f90#60 | HCAV = HR ! 360 |
| WAKE_DBG.f90#114 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,XB,DBHC,DBWC) |
| #162 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,XB,DBHC,DBWC) |
| #208 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,XB,DBHC,DBWC) |
| WAKE_FQC.f90#76 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,XB,ZCAV,YCAV) |
| WAKE_SCALES.f90#77 | HR = HB + 0.22*RB |
| #91 | WRITE (IO6,*) ' Max. cavity height (HR) = ' , HR |
| WAKE_U.f90#53 | CALL CAVITY_HT(HB,WB,XLB,RB,XLC,XLR,HR,X,ZCAV,YCAV) !4317496 |
| ZSTREAM.f90#2 | SUBROUTINE ZSTREAM(H,W,L,R,LR,HR,X,Y,Z,DZDX) |
| #36 | REAL H , W , L , R , HR , LR , EXPZ1 , EXPZ2 , EXPZG , EXPX |
| #78 | ZSLOPE = 2.*(HR-H)*(X+R)*ONEBYR**2. ! 3398 |
| #98 | ZSLOPE = (-(HR-H)*4.*ONEBYR)*(2.*X*ONEBYR-1.) ! 16930 |
| #111 | ZSLOPE = (HR-H)*(R-2.*X)/((L-RBY2+LR)**2) ! 532546 |
| #125 | ZSLOPELR = -2.*(HR-H)/(L-RBY2+LR) !7388178 |
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