MAPL_NominalOrbitsMod Module

MODULE: MAPL_NominalOrbitsMod

Author: GMAO SI-Team

The module MAPL_NominalOrbitsMod provides necessary functions for generating ground tracks, and corresponding masks for polar orbiter satellites.

History

  • 07Jul2009 Albayrak Initial implementation.
  • 30Jul2009 Albayrak Beta version 2 implemantation

Uses

  • module~~mapl_nominalorbitsmod~~UsesGraph module~mapl_nominalorbitsmod MAPL_NominalOrbitsMod module~mapl_constants MAPL_Constants module~mapl_nominalorbitsmod->module~mapl_constants iso_fortran_env iso_fortran_env module~mapl_constants->iso_fortran_env module~mapl_internalconstantsmod MAPL_InternalConstantsMod module~mapl_constants->module~mapl_internalconstantsmod module~mapl_mathconstantsmod MAPL_MathConstantsMod module~mapl_constants->module~mapl_mathconstantsmod module~mapl_physicalconstantsmod MAPL_PhysicalConstantsMod module~mapl_constants->module~mapl_physicalconstantsmod module~mapl_internalconstantsmod->iso_fortran_env module~mapl_mathconstantsmod->iso_fortran_env module~mapl_physicalconstantsmod->iso_fortran_env module~mapl_physicalconstantsmod->module~mapl_mathconstantsmod

Interfaces

public interface Orbits_Track0

  • private subroutine Orbits_Track1(name, Satcoef_vec1, Normcoef_vec1)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: name
    real(kind=dp), intent(out), dimension(1:Num_coef) :: Satcoef_vec1
    real(kind=dp), intent(out), dimension(1:Num_normcoef) :: Normcoef_vec1

  • private subroutine Orbits_Track2(iSat, Satcoef_vec, Normcoef_vec)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: iSat
    real(kind=dp), intent(out), dimension(1:Num_coef) :: Satcoef_vec
    real(kind=dp), intent(out), dimension(1:Num_normcoef) :: Normcoef_vec

Subroutines

public subroutine Orbits_Swath(slons, slats, Sat_name, nymd, nhms, deltat, SwathWidth, rc, wrap)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), pointer :: slons(:,:)
real(kind=dp), pointer :: slats(:,:)
character(len=*), intent(in) :: Sat_name
integer, intent(in) :: nymd(2)
integer, intent(in) :: nhms(2)
integer, intent(in) :: deltat
real(kind=dp), intent(in) :: SwathWidth(:)
integer, intent(out) :: rc
logical, intent(in), optional :: wrap

public subroutine Orbits_Track(lons, lats, Sat_name, nymd, nhms, deltat, rc)

The subroutine Orbits_Track calculates the satellite ground track during a given time interval. These calculations are performed using pre-calculated coefficients using combination of coordinate transformations, optimization techniques and mathematical modeling techniques.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), pointer :: lons(:)
real(kind=dp), pointer :: lats(:)
character(len=*), intent(in) :: Sat_name
integer, intent(in) :: nymd(2)
integer, intent(in) :: nhms(2)
integer, intent(in) :: deltat
integer, intent(out) :: rc