CAM
wei96.F90 File Reference

Functions/Subroutines

real(r8) function epotval (gLAT, gMLT)
 
subroutine readcoef (wei96_file)
 
real(r8) function fsval (omega, MaxN, FSC)
 
subroutine setmodel (angle, Bt, Tilt, SWVel)
 
subroutine legendre (x, lmax, mmax, Plm)
 
real(r8) function get_tilt (YEAR, MONTH, DAY, HOUR)
 
subroutine rotate (X, Y, Z, I)
 
subroutine rotatev (A, B, I)
 
subroutine fromcart (R, LAT, LONG, POS)
 
subroutine tocart (R, LAT, LONG, POS)
 
subroutine adjust (ANGLE)
 
integer function julday (MM, ID, IYYY)
 
real(r8) function mlt (MagLong)
 
real(r8) function maglong (MLT)
 
subroutine sunloc (SunLat, SunLong)
 
subroutine gecmp (AMLA, RMLT, ET, EP)
 

Function/Subroutine Documentation

◆ adjust()

subroutine adjust ( real(r8)  ANGLE)
Here is the caller graph for this function:

◆ epotval()

real(r8) function epotval ( real(r8)  gLAT,
real(r8)  gMLT 
)
Here is the call graph for this function:

◆ fromcart()

subroutine fromcart ( real(r8)  R,
real(r8)  LAT,
real(r8)  LONG,
real(r8), dimension(3)  POS 
)

◆ fsval()

real(r8) function fsval ( real(r8)  omega,
integer  MaxN,
real(r8), dimension(0:1,0:*)  FSC 
)

◆ gecmp()

subroutine gecmp ( real(r8)  AMLA,
real(r8)  RMLT,
real(r8)  ET,
real(r8)  EP 
)
Here is the caller graph for this function:

◆ get_tilt()

real(r8) function get_tilt ( integer  YEAR,
integer  MONTH,
integer  DAY,
real(r8)  HOUR 
)
Here is the call graph for this function:

◆ julday()

integer function julday ( integer  MM,
integer  ID,
integer  IYYY 
)

◆ legendre()

subroutine legendre ( real(r8)  x,
integer  lmax,
integer  mmax,
real(r8), dimension(0:20,0:20)  Plm 
)
Here is the caller graph for this function:

◆ maglong()

real(r8) function maglong ( real(r8)  MLT)
Here is the call graph for this function:

◆ mlt()

real(r8) function mlt ( real(r8)  MagLong)
Here is the call graph for this function:

◆ readcoef()

subroutine readcoef ( character(len=*), intent(in)  wei96_file)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ rotate()

subroutine rotate ( real(r8)  X,
real(r8)  Y,
real(r8)  Z,
integer  I 
)
Here is the call graph for this function:

◆ rotatev()

subroutine rotatev ( real(r8), dimension(3)  A,
real(r8), dimension(3)  B,
integer  I 
)
Here is the caller graph for this function:

◆ setmodel()

subroutine setmodel ( real(r8)  angle,
real(r8)  Bt,
real(r8)  Tilt,
real(r8)  SWVel 
)
Here is the caller graph for this function:

◆ sunloc()

subroutine sunloc ( real(r8)  SunLat,
real(r8)  SunLong 
)

◆ tocart()

subroutine tocart ( real(r8)  R,
real(r8)  LAT,
real(r8)  LONG,
real(r8), dimension(3)  POS 
)