Alternative small scale meteorology input to a chemical transport ...

APPENDIX A: NEW INTERFACE CODES
C SUBROUTINE GETMET_CALMET
SUBROUTINE GETMET ( SDATE, STIME, ISTAT, ISESN, MOUTFRQ)
C***********************************************************************
C FUNCTION:
C CALMET version
C read the met header info and met arrays from the
C archived meteorological simulation output file
C on the meteorology model domain and resolution
C
C (1) calls READCM to input met header info
C and met arrays;
C (2) checks the starting date and time
C (3) converts met landuse categories into ctm ones
C (4) extracts CTM-relevant meteorological and physical
C fields from met arrays ("F_" arrays at met grid)
C into ctm arrays ("X" arrays at extended ctm grid)
C (5) performs necessary horizontal interpolation on
C the "X" arrays
C (6) calls otther routines to compute
C supplementary "X" arrays.
C
C NOTE: FOR THE TIME BEING ONLY NTHIK=0 IS OPERATIONAL!!!!!
C
C DEPENDENT UPON: 'CMINPUT.EXT' for dimension parameters
C
C INPUT:
C CALMET FILE, REQUIRED by MCIP
C CALMET DATA AVAILABLE THROUGH 'CMINPUT.EXT'
C
C OUTPUT:
C 'X-Arrays' defined in 'MCIPCOM.EXT'
C Units for output ---> in m, s, kg, K, pa, etc. (MKS)
C
C REVISION HISTORY:
C CREATED January 20, 2001 by Krassi & Daewon
C***********************************************************************
IMPLICIT NONE
C** I/O API include files
INCLUDE SUBST_IOPARMS
INCLUDE SUBST_IOFDESC
INCLUDE SUBST_IODECL
C
64