<HTML> <BODY BGCOLOR=#ccccdd LINK=#0000aa VLINK=#0000ff ALINK=#ff0000 ><BASE TARGET="bottom_target"><PRE> ! ! CRTM_AncillaryInput_Define ! ! Module defining a container for CRTM ancillary input. ! ! ! CREATION HISTORY: ! Modifed by: Paul van Delst, 08-Dec-2009 ! paul.vandelst@noaa.gov <A NAME='CRTM_ANCILLARYINPUT_DEFINE'><A href='../../html_code/crtm/CRTM_AncillaryInput_Define.f90.html#CRTM_ANCILLARYINPUT_DEFINE' TARGET='top_target'><IMG SRC="../../gif/bar_purple.gif" border=0></A>MODULE CRTM_AncillaryInput_Define 7,2 ! ----------------- ! Environment setup ! ----------------- ! Module use USE SSU_Input_Define
USE Zeeman_Input_Define
! Disable implicit typing IMPLICIT NONE ! ----------------- ! Module parameters ! ----------------- ! Version Id for the module CHARACTER(*), PRIVATE, PARAMETER :: MODULE_VERSION_ID = & '$Id: CRTM_AncillaryInput_Define.f90 29405 2013-06-20 20:19:52Z paul.vandelst@noaa.gov $' !-------------------- ! Structure defintion !-------------------- !:tdoc+: TYPE :: CRTM_AncillaryInput_type TYPE(SSU_Input_type) :: SSU TYPE(Zeeman_Input_type) :: Zeeman END TYPE CRTM_AncillaryInput_type !:tdoc-: END MODULE CRTM_AncillaryInput_Define