Argument Definitions (+ indicates altered content) REAL FXX, +HPX, +HTX
Description THIS ROUTINE PERFORMS GAUSSIAN INTEGRATION FOR THE VIRTUAL HEIGHTS (SEE SUBROUTINE IONMUF FOR SETTING OF DATA)
Source file: gethp.f
Intrinsic Functions Called REAL AMIN1 GENERIC SQRT
Local Variables (+ indicates altered content) INTEGER +IB, +IG, +IH REAL +FR, +HP, +HRMZ, +HT REAL +YMUP, +YSQ, +ZG, +ZI REAL +ZMUP
Referenced Common Block Variables (+ indicates altered content) DATR INTEGER NPL, NT DATR REAL TWDIV, WT(20) DATR REAL XNPL, XT(20) RON REAL FNSQ(50,3) RON REAL HTR(50,3)