GTD7 Subroutine

  1. msis00_gfortran.f
  2. GTD7

subroutine GTD7(IYD, SEC, ALT, GLAT, GLONG, STL, F107A, F107, AP, MASS, D, T)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: IYD
real, intent(in) :: SEC
real, intent(in) :: ALT
real, intent(in) :: GLAT
real, intent(in) :: GLONG
real, intent(in) :: STL
real, intent(in) :: F107A
real, intent(in) :: F107
real, intent(in) :: AP(7)
integer, intent(in) :: MASS
real, intent(out) :: D(9)
real, intent(out) :: T(2)

Calls

proc~~gtd7~~CallsGraph proc~gtd7 GTD7 tgn3 tgn3 proc~gtd7->tgn3 pma pma proc~gtd7->pma tn1 tn1 proc~gtd7->tn1 sw sw proc~gtd7->sw proc~glob7s GLOB7S proc~gtd7->proc~glob7s proc~densm DENSM proc~gtd7->proc~densm pavgm pavgm proc~gtd7->pavgm proc~glatf GLATF proc~gtd7->proc~glatf tn3 tn3 proc~gtd7->tn3 pdm pdm proc~gtd7->pdm proc~vtst7 VTST7 proc~gtd7->proc~vtst7 proc~gts7 GTS7 proc~gtd7->proc~gts7 tgn2 tgn2 proc~gtd7->tgn2 tgn1 tgn1 proc~gtd7->tgn1 tn2 tn2 proc~gtd7->tn2 proc~glob7s->sw swc swc proc~glob7s->swc apt apt proc~glob7s->apt plg plg proc~glob7s->plg t t proc~glob7s->t proc~splini SPLINI proc~densm->proc~splini proc~splint SPLINT proc~densm->proc~splint xs xs proc~densm->xs amax1 amax1 proc~densm->amax1 proc~spline SPLINE proc~densm->proc~spline zeta zeta proc~densm->zeta ys ys proc~densm->ys proc~vtst7->sw glatl glatl proc~vtst7->glatl stll stll proc~vtst7->stll swl swl proc~vtst7->swl fl fl proc~vtst7->fl fal fal proc~vtst7->fal proc~vtst7->swc secl secl proc~vtst7->secl apl apl proc~vtst7->apl gll gll proc~vtst7->gll iydl iydl proc~vtst7->iydl swcl swcl proc~vtst7->swcl proc~gts7->pma proc~gts7->tn1 proc~gts7->sw proc~gts7->proc~glob7s proc~gts7->pdm proc~gts7->proc~vtst7 proc~gts7->tgn1 pt pt proc~gts7->pt alog alog proc~gts7->alog proc~ccor CCOR proc~gts7->proc~ccor mt mt proc~gts7->mt alpha alpha proc~gts7->alpha ptl ptl proc~gts7->ptl proc~densu DENSU proc~gts7->proc~densu zn1 zn1 proc~gts7->zn1 proc~dnet DNET proc~gts7->proc~dnet proc~scalh SCALH proc~gts7->proc~scalh altl altl proc~gts7->altl ptm ptm proc~gts7->ptm amod amod proc~gts7->amod ps ps proc~gts7->ps pd pd proc~gts7->pd proc~globe7 GLOBE7 proc~gts7->proc~globe7 proc~ccor2 CCOR2 proc~gts7->proc~ccor2 pdl pdl proc~gts7->pdl amin1 amin1 proc~splini->amin1 proc~densu->proc~splini proc~densu->proc~splint proc~densu->xs proc~densu->amax1 proc~densu->proc~spline proc~densu->zeta proc~densu->ys proc~dnet->alog u u proc~spline->u proc~globe7->sw proc~globe7->swc proc~globe7->apt proc~globe7->plg proc~globe7->t sg0 sg0 proc~globe7->sg0 g0 g0 proc~globe7->g0 sumex sumex proc~globe7->sumex

Called by

proc~~gtd7~~CalledByGraph proc~gtd7 GTD7 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


Common Blocks

common /GTS3C/

Type AttributesNameInitial
real :: TLB
real :: S
real :: DB04
real :: DB16
real :: DB28
real :: DB32
real :: DB40
real :: DB48
real :: DB01
real :: ZA
real :: T0
real :: Z0
real :: G0
real :: RL
real :: DD
real :: DB14
real :: TR12

common /MESO7/

Type AttributesNameInitial
real :: TN1(5)
real :: TN2(4)
real :: TN3(5)
real :: TGN1(2)
real :: TGN2(2)
real :: TGN3(2)

common /LOWER7/

Type AttributesNameInitial
real :: PTM(10)
real :: PDM(10,8)

common /PARM7/

Type AttributesNameInitial
real :: PT(150)
real :: PD(150,9)
real :: PS(150)
real :: PDL(25,2)
real :: PTL(100,4)
real :: PMA(100,10)
real :: SAM(100)

common /DATIM7/

Type AttributesNameInitial
integer :: ISD
integer :: IST
integer :: NAM

common /DATIME/

Type AttributesNameInitial
integer :: ISDATE
integer :: ISTIME
integer :: NAME

common /CSW/

Type AttributesNameInitial
real :: SW(25)
integer :: ISW
real :: SWC(25)

common /MAVG7/

Type AttributesNameInitial
real :: PAVGM(10)

common /DMIX/

Type AttributesNameInitial
real :: DM04
real :: DM16
real :: DM28
real :: DM32
real :: DM40
real :: DM01
real :: DM14

common /PARMB/

Type AttributesNameInitial
real :: GSURF
real :: RE

common /METSEL/

Type AttributesNameInitial
integer :: IMR