GLOB7S Function

function GLOB7S(P)

Arguments

Type IntentOptional AttributesName
real :: P

Return Value real


Calls

proc~~glob7s~~CallsGraph proc~glob7s GLOB7S sw sw proc~glob7s->sw plg plg proc~glob7s->plg swc swc proc~glob7s->swc apt apt proc~glob7s->apt t t proc~glob7s->t

Called by

proc~~glob7s~~CalledByGraph proc~glob7s GLOB7S proc~gtd7 GTD7 proc~gtd7->proc~glob7s proc~gts7 GTS7 proc~gtd7->proc~gts7 proc~gts7->proc~glob7s proc~gtd7d GTD7D proc~gtd7d->proc~gtd7 proc~ghp7 GHP7 proc~ghp7->proc~gtd7 proc~neutral_atmos neutral_atmos proc~neutral_atmos->proc~gtd7 interface~neutral_atmos neutral_atmos interface~neutral_atmos->proc~neutral_atmos program~gemini3d Gemini3D program~gemini3d->interface~neutral_atmos

Contents


Common Blocks

Type AttributesNameInitial
real :: PLG(9,4)
real :: CTLOC
real :: STLOC
real :: C2TLOC
real :: S2TLOC
real :: C3TLOC
real :: S3TLOC
integer :: IYR
real :: DAY
real :: DF
real :: DFA
real :: APD
real :: APDF
real :: APT(4)
integer :: LONG
Type AttributesNameInitial
real :: SW(25)
integer :: ISW
real :: SWC(25)