CAM
apex_subs.F90 File Reference

Functions/Subroutines

subroutine apxmka (MSGUN, EPOCH, GPLAT, GPLON, GPALT, NLAT, NLON, NALT, WK, LWK, IST)
 
subroutine intrp (GLAT, GLON, ALT, X, Y, Z, V, NLAT, NLON, NALT, GPLAT, GPLON, GPALT, FX, FY, FZ, FV, DFXDTH, DFYDTH, DFZDTH, DFVDTH, DFXDLN, DFYDLN, DFZDLN,
 
subroutine trilin (U, NLAT, NLON, XI, YJ, ZK, FU, DFUDX, DFUDY, DFUDZ)
 
subroutine adpl (GLAT, GLON, CTH, STH, FX, FY, FZ, FV, DFXDTH, DFYDTH, DFZDTH, DFVDTH, DFXDLN, DFYDLN, DFZDLN, DFVDLN)
 
subroutine adplsc (GLAT, GLON, FX, FY, FZ)
 
subroutine gradxyzv (ALT, CTH, STH, DFXDTH, DFYDTH, DFZDTH, DFVDTH, DFXDLN, DFYDLN, DFZDLN, DFVDLN,
 
subroutine gradlpv (HR, ALT, FX, FY, FZ, FV, GRADX, GRADY, GRADZ, GRADV, XLATM, XLONM, VMP, GRCLM, CLMGRP, QDLAT, RGRLP, B, CLM, R3_2)
 
subroutine basvec (HR, XLATM, GRCLM, CLMGRP, RGRLP, B, CLM, R3_2, BMAG, SIM, SI, F, D, W, BHAT, D1, D2, D3, E1, E2, E3, F1, F2)
 
subroutine ckgp (CALNM, MSGUN, NLAT, NLON, NALT, GPLAT, GPLON, GPALT, IST)
 
subroutine makexyzv (EPOCH, NLAT, NLON, NALT, GPLAT, GPLON, GPALT, X, Y, Z, V)
 
subroutine setmiss (XMISS, XLATM, XLONM, VMP, B, BMAG, BE3, SIM, SI, F, D, W, BHAT, D1, D2, D3, E1, E2, E3, F1, F2)
 
subroutine gm2gc (GMLAT, GMLON, GCLAT, GCLON)
 
subroutine apex (DATE, DLAT, DLON, ALT, A, ALAT, ALON, BMAG, XMAG, YMAG, ZMAG, V)
 
subroutine linapx (GDLAT, GLON, ALT, A, ALAT, ALON, XMAG, YMAG, ZMAG, F)
 
subroutine itrace (IAPX)
 
subroutine fndapx (ALT, ZMAG, A, ALAT, ALON)
 
subroutine dipapx (GDLAT, GDLON, ALT, BNORTH, BEAST, BDOWN, A, ALON)
 
subroutine fint (A1, A2, A3, A4, A5, A6, A7, RESULT)
 
subroutine cofrm (DATE)
 
subroutine dypol (COLAT, ELON, VP)
 
subroutine feldg (IENTY, GLAT, GLON, ALT, BNRTH, BEAST, BDOWN, BABS)
 
subroutine gd2cart (GDLAT, GLON, ALT, X, Y, Z)
 
subroutine convrt (I, GDLAT, ALT, X1, X2)
 
subroutine magloctm (ALON, SBSLLAT, SBSLLON, CLATP, POLON, MLT)
 
subroutine solgmlon (XLAT, XLON, COLAT, ELON, MLON)
 
subroutine subsol (IYR, IDAY, IHR, IMN, SEC, SBSLLAT, SBSLLON)
 

Function/Subroutine Documentation

◆ adpl()

subroutine adpl ( real(r8)  GLAT,
real(r8)  GLON,
real(r8)  CTH,
real(r8)  STH,
real(r8)  FX,
real(r8)  FY,
real(r8)  FZ,
real(r8)  FV,
real(r8)  DFXDTH,
real(r8)  DFYDTH,
real(r8)  DFZDTH,
real(r8)  DFVDTH,
real(r8)  DFXDLN,
real(r8)  DFYDLN,
real(r8)  DFZDLN,
real(r8)  DFVDLN 
)
Here is the caller graph for this function:

◆ adplsc()

subroutine adplsc ( real(r8)  GLAT,
real(r8)  GLON,
real(r8)  FX,
real(r8)  FY,
real(r8)  FZ 
)
Here is the caller graph for this function:

◆ apex()

subroutine apex ( real(r8)  DATE,
real(r8)  DLAT,
real(r8)  DLON,
real(r8)  ALT,
real(r8)  A,
real(r8)  ALAT,
real(r8)  ALON,
real(r8)  BMAG,
real(r8)  XMAG,
real(r8)  YMAG,
  ZMAG,
  V 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ apxmka()

subroutine apxmka ( integer  MSGUN,
real(r8), dimension(*)  EPOCH,
real(r8), dimension(nlat)  GPLAT,
real(r8), dimension(nlon)  GPLON,
real(r8), dimension(nalt)  GPALT,
integer  NLAT,
integer  NLON,
integer  NALT,
real(r8), dimension(lwk)  WK,
integer  LWK,
integer  IST 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ basvec()

subroutine basvec ( real(r8)  HR,
real(r8)  XLATM,
real(r8), dimension(3)  GRCLM,
real(r8), dimension(3)  CLMGRP,
real(r8), dimension(3)  RGRLP,
real(r8), dimension(3)  B,
real(r8)  CLM,
real(r8)  R3_2,
real(r8)  BMAG,
real(r8)  SIM,
real(r8)  SI,
real(r8)  F,
real(r8)  D,
real(r8)  W,
real(r8), dimension(3)  BHAT,
real(r8), dimension(3)  D1,
real(r8), dimension(3)  D2,
real(r8), dimension(3)  D3,
real(r8), dimension(3)  E1,
real(r8), dimension(3)  E2,
real(r8), dimension(3)  E3,
real(r8), dimension(2)  F1,
real(r8), dimension(2)  F2 
)
Here is the caller graph for this function:

◆ ckgp()

subroutine ckgp ( character*(*)  CALNM,
integer  MSGUN,
integer  NLAT,
integer  NLON,
integer  NALT,
real(r8), dimension(nlat)  GPLAT,
real(r8), dimension(nlon)  GPLON,
real(r8), dimension(nalt)  GPALT,
integer  IST 
)
Here is the caller graph for this function:

◆ cofrm()

subroutine cofrm ( real(r8)  DATE)
Here is the caller graph for this function:

◆ convrt()

subroutine convrt ( integer  I,
real(r8)  GDLAT,
real(r8)  ALT,
real(r8)  X1,
real(r8)  X2 
)
Here is the caller graph for this function:

◆ dipapx()

subroutine dipapx ( real(r8)  GDLAT,
real(r8)  GDLON,
real(r8)  ALT,
real(r8)  BNORTH,
real(r8)  BEAST,
real(r8)  BDOWN,
real(r8)  A,
real(r8)  ALON 
)
Here is the caller graph for this function:

◆ dypol()

subroutine dypol ( real(r8)  COLAT,
real(r8)  ELON,
real(r8)  VP 
)
Here is the caller graph for this function:

◆ feldg()

subroutine feldg ( integer  IENTY,
real(r8)  GLAT,
real(r8)  GLON,
real(r8)  ALT,
real(r8)  BNRTH,
real(r8)  BEAST,
real(r8)  BDOWN,
real(r8)  BABS 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ fint()

subroutine fint ( real(r8)  A1,
real(r8)  A2,
real(r8)  A3,
real(r8)  A4,
real(r8)  A5,
real(r8)  A6,
real(r8)  A7,
real(r8)  RESULT 
)
Here is the caller graph for this function:

◆ fndapx()

subroutine fndapx ( real(r8)  ALT,
real(r8)  ZMAG,
real(r8)  A,
real(r8)  ALAT,
real(r8)  ALON 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ gd2cart()

subroutine gd2cart ( real(r8)  GDLAT,
real(r8)  GLON,
real(r8)  ALT,
real(r8)  X,
real(r8)  Y,
real(r8)  Z 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ gm2gc()

subroutine gm2gc ( real(r8)  GMLAT,
real(r8)  GMLON,
real(r8)  GCLAT,
real(r8)  GCLON 
)
Here is the caller graph for this function:

◆ gradlpv()

subroutine gradlpv ( real(r8)  HR,
real(r8)  ALT,
real(r8)  FX,
real(r8)  FY,
real(r8)  FZ,
real(r8)  FV,
real(r8), dimension(3)  GRADX,
real(r8), dimension(3)  GRADY,
real(r8), dimension(3)  GRADZ,
real(r8), dimension(3)  GRADV,
real(r8)  XLATM,
real(r8)  XLONM,
real(r8)  VMP,
real(r8), dimension(3)  GRCLM,
real(r8), dimension(3)  CLMGRP,
real(r8)  QDLAT,
real(r8), dimension(3)  RGRLP,
real(r8), dimension(3)  B,
real(r8)  CLM,
real(r8)  R3_2 
)
Here is the caller graph for this function:

◆ gradxyzv()

subroutine gradxyzv ( real(r8)  ALT,
real(r8)  CTH,
real(r8)  STH,
real(r8)  DFXDTH,
real(r8)  DFYDTH,
real(r8)  DFZDTH,
real(r8)  DFVDTH,
real(r8)  DFXDLN,
real(r8)  DFYDLN,
real(r8)  DFZDLN,
real(r8)  DFVDLN 
)
Here is the caller graph for this function:

◆ intrp()

subroutine intrp ( real(r8)  GLAT,
real(r8)  GLON,
real(r8)  ALT,
real(r8), dimension(nlat,nlon,nalt)  X,
real(r8), dimension(nlat,nlon,nalt)  Y,
real(r8), dimension(nlat,nlon,nalt)  Z,
  V,
integer  NLAT,
integer  NLON,
integer  NALT,
  GPLAT,
  GPLON,
  GPALT,
real(r8)  FX,
real(r8)  FY,
real(r8)  FZ,
real(r8)  FV,
real(r8)  DFXDTH,
real(r8)  DFYDTH,
real(r8)  DFZDTH,
real(r8)  DFVDTH,
real(r8)  DFXDLN,
real(r8)  DFYDLN,
real(r8)  DFZDLN 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ itrace()

subroutine itrace ( real(r8)  IAPX)
Here is the caller graph for this function:

◆ linapx()

subroutine linapx ( real(r8)  GDLAT,
real(r8)  GLON,
real(r8)  ALT,
real(r8)  A,
real(r8)  ALAT,
real(r8)  ALON,
real(r8)  XMAG,
real(r8)  YMAG,
real(r8)  ZMAG,
real(r8)  F 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ magloctm()

subroutine magloctm ( real(r8)  ALON,
real(r8)  SBSLLAT,
real(r8)  SBSLLON,
real(r8)  CLATP,
real(r8)  POLON,
real(r8)  MLT 
)
Here is the call graph for this function:

◆ makexyzv()

subroutine makexyzv ( real(r8)  EPOCH,
integer  NLAT,
integer  NLON,
integer  NALT,
  GPLAT,
  GPLON,
  GPALT,
real(r8), dimension(nlat,nlon,nalt)  X,
real(r8), dimension(nlat,nlon,nalt)  Y,
real(r8), dimension(nlat,nlon,nalt)  Z,
  V 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ setmiss()

subroutine setmiss ( real(r8)  XMISS,
real(r8)  XLATM,
real(r8)  XLONM,
real(r8)  VMP,
real(r8), dimension(3)  B,
real(r8)  BMAG,
real(r8)  BE3,
real(r8)  SIM,
real(r8)  SI,
real(r8)  F,
real(r8)  D,
real(r8)  W,
real(r8), dimension(3)  BHAT,
real(r8), dimension(3)  D1,
real(r8), dimension(3)  D2,
real(r8), dimension(3)  D3,
real(r8), dimension(3)  E1,
real(r8), dimension(3)  E2,
real(r8), dimension(3)  E3,
real(r8), dimension(2)  F1,
real(r8), dimension(2)  F2 
)
Here is the caller graph for this function:

◆ solgmlon()

subroutine solgmlon ( real(r8)  XLAT,
real(r8)  XLON,
real(r8)  COLAT,
real(r8)  ELON,
real(r8)  MLON 
)
Here is the caller graph for this function:

◆ subsol()

subroutine subsol ( integer  IYR,
integer  IDAY,
integer  IHR,
integer  IMN,
real(r8)  SEC,
real(r8)  SBSLLAT,
real(r8)  SBSLLON 
)

◆ trilin()

subroutine trilin ( real(r8), dimension(2,2,2)  U,
integer  NLAT,
integer  NLON,
real(r8)  XI,
real(r8)  YJ,
real(r8)  ZK,
real(r8)  FU,
real(r8)  DFUDX,
real(r8)  DFUDY,
real(r8)  DFUDZ 
)
Here is the caller graph for this function: