1Tk820309 919.0ïl®e  read_met_module.f90READ_MET_MODULE     @ 'H#VERSION#NX#NY#IPROJ #XFCST #XLVL #STARTLAT #STARTLON #STARTI#STARTJ#DELTALAT#DELTALON#DX#DY#XLONC#CENTERLAT#CENTERLON#POLE_LAT#POLE_LON#TRUELAT1#TRUELAT2#EARTH_RADIUS#SLAB#IS_WIND_GRID_REL#FIELD#HDATE#UNITS #MAP_SOURCE!#DESC"           $ ( , 0 4 8 < @ D H L P T X &&¸ ¼Å Ý! ö".  #3  $1024#@ %#ASSERTION&#LEVEL'#FMTSTRING(#NEWLINE)#I1*#I2+#I3,#I4-#I5.#I6/#F10#F21#F32#F43#F54#F65#S16#S27#S38#S49#S5:#S6;#L1<#L2=#L3>#L4?#L5@#L6A & ' (1 ) * + , - . / 0  1  2  3  4  5  61 71 81 91 :1 ;1 < = > ? @ A  B0  C3  D1  E2  F   eÂJ6370000.  G4  H6 @I @@J#@K#FG_SOURCEL#SOURCE_IS_CONSTANTM#DATESTRN#ISTATUSO @L1 M @N1DO#@P#FG_DATAQ#ISTATUSR DQH#MET_DATADR#@S ,fn#fn!Ì@JCONSTANTS_MODULE @JMODULE_DEBUG(L@JMISC_DEFINITIONS_MODULE Œ@JMET_DATA_MODULE)Ì»MET_DATA+MET_DATA_MODULE1‡HaMET_DATA%VERSION+MET_DATA_MODULE,ÏHaMET_DATA%NX+MET_DATA_MODULE,HaMET_DATA%NY+MET_DATA_MODULE/_HaMET_DATA%IPROJ+MET_DATA_MODULE/§HaMET_DATA%XFCST+MET_DATA_MODULE.ïHaMET_DATA%XLVL+MET_DATA_MODULE27HaMET_DATA%STARTLAT+MET_DATA_MODULE2HaMET_DATA%STARTLON+MET_DATA_MODULE0ÇHaMET_DATA%STARTI+MET_DATA_MODULE0HaMET_DATA%STARTJ+MET_DATA_MODULE2WHaMET_DATA%DELTALAT+MET_DATA_MODULE2ŸHaMET_DATA%DELTALON+MET_DATA_MODULE,çHaMET_DATA%DX+MET_DATA_MODULE,/HaMET_DATA%DY+MET_DATA_MODULE/wHaMET_DATA%XLONC+MET_DATA_MODULE3¿HaMET_DATA%CENTERLAT+MET_DATA_MODULE3HaMET_DATA%CENTERLON+MET_DATA_MODULE2OHaMET_DATA%POLE_LAT+MET_DATA_MODULE2—HaMET_DATA%POLE_LON+MET_DATA_MODULE2ßHaMET_DATA%TRUELAT1+MET_DATA_MODULE2' HaMET_DATA%TRUELAT2+MET_DATA_MODULE6o HaMET_DATA%EARTH_RADIUS+MET_DATA_MODULE.· ¬aMET_DATA%SLAB+MET_DATA_MODULE:c HaMET_DATA%IS_WIND_GRID_REL+MET_DATA_MODULE/« PaMET_DATA%FIELD+MET_DATA_MODULE/û PaMET_DATA%HDATE+MET_DATA_MODULE/K PaMET_DATA%UNITS+MET_DATA_MODULE4› PaMET_DATA%MAP_SOURCE+MET_DATA_MODULE.ë PaMET_DATA%DESC+MET_DATA_MODULE#; qERROR+MODULE_DEBUG9¬ tMAX_FILENAME_LEN+MISC_DEFINITIONS_MODULE% >MPRINTF+MODULE_DEBUG/^@aMPRINTF%ASSERTION+MODULE_DEBUG+ž@aMPRINTF%LEVEL+MODULE_DEBUG/ÞLaMPRINTF%FMTSTRING+MODULE_DEBUG-*@aMPRINTF%NEWLINE+MODULE_DEBUG(j@aMPRINTF%I1+MODULE_DEBUG(ª@aMPRINTF%I2+MODULE_DEBUG(ê@aMPRINTF%I3+MODULE_DEBUG(*@aMPRINTF%I4+MODULE_DEBUG(j@aMPRINTF%I5+MODULE_DEBUG(ª@aMPRINTF%I6+MODULE_DEBUG(ê@aMPRINTF%F1+MODULE_DEBUG(*@aMPRINTF%F2+MODULE_DEBUG(j@aMPRINTF%F3+MODULE_DEBUG(ª@aMPRINTF%F4+MODULE_DEBUG(ê@aMPRINTF%F5+MODULE_DEBUG(*@aMPRINTF%F6+MODULE_DEBUG(jLaMPRINTF%S1+MODULE_DEBUG(¶LaMPRINTF%S2+MODULE_DEBUG(LaMPRINTF%S3+MODULE_DEBUG(NLaMPRINTF%S4+MODULE_DEBUG(šLaMPRINTF%S5+MODULE_DEBUG(æLaMPRINTF%S6+MODULE_DEBUG(2@aMPRINTF%L1+MODULE_DEBUG(r@aMPRINTF%L2+MODULE_DEBUG(²@aMPRINTF%L3+MODULE_DEBUG(ò@aMPRINTF%L4+MODULE_DEBUG(2@aMPRINTF%L5+MODULE_DEBUG(r@aMPRINTF%L6+MODULE_DEBUG4²qPROJ_LATLON+MISC_DEFINITIONS_MODULE2#qPROJ_MERC+MISC_DEFINITIONS_MODULE0”qPROJ_LC+MISC_DEFINITIONS_MODULE0qPROJ_PS+MISC_DEFINITIONS_MODULE0vxEARTH_RADIUS_M+CONSTANTS_MODULE3îqPROJ_GAUSS+MISC_DEFINITIONS_MODULE5_qPROJ_CASSINI+MISC_DEFINITIONS_MODULEÐ@INPUT_UNIT@FILENAMEP‰READ_MET_INIT(ÙLaREAD_MET_INIT%FG_SOURCE1%@aREAD_MET_INIT%SOURCE_IS_CONSTANT&eLaREAD_MET_INIT%DATESTR&±@aREAD_MET_INIT%ISTATUS$ñbREAD_NEXT_MET_FIELD,SVaREAD_NEXT_MET_FIELD%FG_DATA,©@aREAD_NEXT_MET_FIELD%ISTATUSéHREAD_MET_CLOSE