)?k820309 919.0le  llxy_module.f90LLXY_MODULE  @      @ ''#CODE#NLAT#NLON #NXMIN #NXMAX #IXDIM #JYDIM #STAGGER#PHI#LAMBDA#LAT1#LON1#LAT0#LON0#DX#DY#LATINC#LONINC#DLAT#DLON#STDLON#TRUELAT1#TRUELAT2#HEMI#CONE#POLEI #POLEJ!#RSW"#REBYDX##KNOWNI$#KNOWNJ%#RE_M&#RHO0'#NC(#BIGC)#INIT*#WRAP+#COMP_LL,#GAUSS_LAT-       $ ( , 0 4 8 < @ D H L P T X \ `  d !h "l #p $t %x &| '! (" )# *$+%,&-' &  .3  /21  0ʚ;1E9#@ 1#ASSERTION2#LEVEL3#FMTSTRING4#NEWLINE5#I16#I27#I38#I49#I5:#I6;#F1<#F2=#F3>#F4?#F5@#F6A#S1B#S2C#S3D#S4E#S5F#S6G#L1H#L2I#L3J#L4K#L5L#L6M 2 3 41 5 6 7 8 9 : ; <  =  >  ?  @  A  B1 C1 D1 E1 F1 G1 H I J K L M#@ N#PROJO O#PROJ_INFO  P0#@ Q#PROJ_CODER#PROJS#LAT1T#LON1U#LAT0V#LON0W#KNOWNIX#KNOWNJY#DXZ#DY[#LATINC\#LONINC]#STDLON^#TRUELAT1_#TRUELAT2`#NLATa#NLONb#IXDIMc#JYDIMd#NXMINe#NXMAXf#STAGGERg#PHIh#LAMBDAi#R_EARTHj RS#PROJ_INFO T  U  V  W  X  Y  Z  [  \  ]  ^  _  `  a b c d e f g h  i  j   k3  l5  m6  n1  oi105  p2  qf102  r4  s203  t4  u5#@ v#PROJw#LATx#LONy#Iz#J{ w#PROJ_INFO x  y z {  |2  }3  ~6#@ #PROJ#I#J#LAT#LON #PROJ_INFO      20 @ @ @@*p&ppp*#PROJ_INFO  #@#IPROJECTION#USER_STAND_LON#USER_TRUELAT1#USER_TRUELAT2#USER_DXKM#USER_DYKM#USER_DLAT#USER_DLON#USER_KNOWN_X#USER_KNOWN_Y#USER_KNOWN_LAT#USER_KNOWN_LON#USER_POLE_LAT#USER_POLE_LON#USER_CENTERLAT#USER_CENTERLON#USER_CENTERI#USER_CENTERJ#EARTH_RADIUS @ @  @  @  @    @  @  @  @  @  @  @  @  @  @  @  @  @ #@#@#IPROJECTION#USER_STAND_LON#USER_TRUELAT1#USER_TRUELAT2#USER_DXKM#USER_DYKM#USER_DLAT#USER_DLON#USER_XDIM#USER_YDIM#USER_KNOWN_X#USER_KNOWN_Y#USER_KNOWN_LAT#USER_KNOWN_LON#USER_POLE_LAT#USER_POLE_LON#EARTH_RADIUS @ @  @  @  @  @  @  @  @ @ @  @  @  @  @  @  @ #@#DOMAIN_NUM %@ #@#XLAT#XLON#X#Y#STAGGER#COMP_LL @  @ D@ D@   @#@#X#Y#XLAT#XLON#STAGGER#COMP_LL    D@ D@   @$fn#fn @JGRIDINFO_MODULE@JLIST_MODULED@JMAP_UTILS@JMODULE_DEBUG(@JMISC_DEFINITIONS_MODULE$PROJ_INFO+MAP_UTILS)HaPROJ_INFO%CODE+MAP_UTILS)AHaPROJ_INFO%NLAT+MAP_UTILS)HaPROJ_INFO%NLON+MAP_UTILS*HaPROJ_INFO%NXMIN+MAP_UTILS*HaPROJ_INFO%NXMAX+MAP_UTILS*aHaPROJ_INFO%IXDIM+MAP_UTILS*HaPROJ_INFO%JYDIM+MAP_UTILS,HaPROJ_INFO%STAGGER+MAP_UTILS(9HaPROJ_INFO%PHI+MAP_UTILS+HaPROJ_INFO%LAMBDA+MAP_UTILS)HaPROJ_INFO%LAT1+MAP_UTILS)HaPROJ_INFO%LON1+MAP_UTILS)YHaPROJ_INFO%LAT0+MAP_UTILS)HaPROJ_INFO%LON0+MAP_UTILS'HaPROJ_INFO%DX+MAP_UTILS'1HaPROJ_INFO%DY+MAP_UTILS+yHaPROJ_INFO%LATINC+MAP_UTILS+HaPROJ_INFO%LONINC+MAP_UTILS) HaPROJ_INFO%DLAT+MAP_UTILS)Q HaPROJ_INFO%DLON+MAP_UTILS+ HaPROJ_INFO%STDLON+MAP_UTILS- HaPROJ_INFO%TRUELAT1+MAP_UTILS-) HaPROJ_INFO%TRUELAT2+MAP_UTILS)q HaPROJ_INFO%HEMI+MAP_UTILS) HaPROJ_INFO%CONE+MAP_UTILS* HaPROJ_INFO%POLEI+MAP_UTILS*I HaPROJ_INFO%POLEJ+MAP_UTILS( HaPROJ_INFO%RSW+MAP_UTILS+ HaPROJ_INFO%REBYDX+MAP_UTILS+! HaPROJ_INFO%KNOWNI+MAP_UTILS+i HaPROJ_INFO%KNOWNJ+MAP_UTILS) HaPROJ_INFO%RE_M+MAP_UTILS) HaPROJ_INFO%RHO0+MAP_UTILS'A HaPROJ_INFO%NC+MAP_UTILS) HaPROJ_INFO%BIGC+MAP_UTILS) HaPROJ_INFO%INIT+MAP_UTILS)HaPROJ_INFO%WRAP+MAP_UTILS,aHaPROJ_INFO%COMP_LL+MAP_UTILS.aPROJ_INFO%GAUSS_LAT+MAP_UTILS#=qERROR+MODULE_DEBUG,rMAX_DOMAINS+GRIDINFO_MODULE0 sINVALID+MISC_DEFINITIONS_MODULE%>MPRINTF+MODULE_DEBUG/@aMPRINTF%ASSERTION+MODULE_DEBUG+@aMPRINTF%LEVEL+MODULE_DEBUG/QLaMPRINTF%FMTSTRING+MODULE_DEBUG-@aMPRINTF%NEWLINE+MODULE_DEBUG(@aMPRINTF%I1+MODULE_DEBUG(@aMPRINTF%I2+MODULE_DEBUG(]@aMPRINTF%I3+MODULE_DEBUG(@aMPRINTF%I4+MODULE_DEBUG(@aMPRINTF%I5+MODULE_DEBUG(@aMPRINTF%I6+MODULE_DEBUG(]@aMPRINTF%F1+MODULE_DEBUG(@aMPRINTF%F2+MODULE_DEBUG(@aMPRINTF%F3+MODULE_DEBUG(@aMPRINTF%F4+MODULE_DEBUG(]@aMPRINTF%F5+MODULE_DEBUG(@aMPRINTF%F6+MODULE_DEBUG(LaMPRINTF%S1+MODULE_DEBUG()LaMPRINTF%S2+MODULE_DEBUG(uLaMPRINTF%S3+MODULE_DEBUG(LaMPRINTF%S4+MODULE_DEBUG( LaMPRINTF%S5+MODULE_DEBUG(YLaMPRINTF%S6+MODULE_DEBUG(@aMPRINTF%L1+MODULE_DEBUG(@aMPRINTF%L2+MODULE_DEBUG(%@aMPRINTF%L3+MODULE_DEBUG(e@aMPRINTF%L4+MODULE_DEBUG(@aMPRINTF%L5+MODULE_DEBUG(@aMPRINTF%L6+MODULE_DEBUG#%RMAP_INIT+MAP_UTILS(wWaMAP_INIT%PROJ+MAP_UTILS4qPROJ_LATLON+MISC_DEFINITIONS_MODULE"?`MAP_SET+MAP_UTILS,@aMAP_SET%PROJ_CODE+MAP_UTILS'WaMAP_SET%PROJ+MAP_UTILS'6@aMAP_SET%LAT1+MAP_UTILS'v@aMAP_SET%LON1+MAP_UTILS'@aMAP_SET%LAT0+MAP_UTILS'@aMAP_SET%LON0+MAP_UTILS)6@aMAP_SET%KNOWNI+MAP_UTILS)v@aMAP_SET%KNOWNJ+MAP_UTILS%@aMAP_SET%DX+MAP_UTILS%@aMAP_SET%DY+MAP_UTILS)6@aMAP_SET%LATINC+MAP_UTILS)v@aMAP_SET%LONINC+MAP_UTILS)@aMAP_SET%STDLON+MAP_UTILS+@aMAP_SET%TRUELAT1+MAP_UTILS+6@aMAP_SET%TRUELAT2+MAP_UTILS'v@aMAP_SET%NLAT+MAP_UTILS'@aMAP_SET%NLON+MAP_UTILS(@aMAP_SET%IXDIM+MAP_UTILS(6 @aMAP_SET%JYDIM+MAP_UTILS(v @aMAP_SET%NXMIN+MAP_UTILS( @aMAP_SET%NXMAX+MAP_UTILS* @aMAP_SET%STAGGER+MAP_UTILS&6!@aMAP_SET%PHI+MAP_UTILS)v!@aMAP_SET%LAMBDA+MAP_UTILS*!@aMAP_SET%R_EARTH+MAP_UTILS2!qPROJ_MERC+MISC_DEFINITIONS_MODULE1g"qPROJ_CYL+MISC_DEFINITIONS_MODULE5"qPROJ_CASSINI+MISC_DEFINITIONS_MODULE0I#qPROJ_LC+MISC_DEFINITIONS_MODULE:#sPROJ_ALBERS_NAD83+MISC_DEFINITIONS_MODULE0-$qPROJ_PS+MISC_DEFINITIONS_MODULE6$sPROJ_PS_WGS84+MISC_DEFINITIONS_MODULE3%qPROJ_GAUSS+MISC_DEFINITIONS_MODULE3%sPROJ_ROTLL+MISC_DEFINITIONS_MODULE+%qHH+MISC_DEFINITIONS_MODULE+f&qVV+MISC_DEFINITIONS_MODULE'&rLATLON_TO_IJ+MAP_UTILS,I'WaLATLON_TO_IJ%PROJ+MAP_UTILS+'@aLATLON_TO_IJ%LAT+MAP_UTILS+'@aLATLON_TO_IJ%LON+MAP_UTILS) (@aLATLON_TO_IJ%I+MAP_UTILS)`(@aLATLON_TO_IJ%J+MAP_UTILS*(qU+MISC_DEFINITIONS_MODULE*)qV+MISC_DEFINITIONS_MODULE/)qCORNER+MISC_DEFINITIONS_MODULE')rIJ_TO_LATLON+MAP_UTILS,e*WaIJ_TO_LATLON%PROJ+MAP_UTILS)*@aIJ_TO_LATLON%I+MAP_UTILS)*@aIJ_TO_LATLON%J+MAP_UTILS+<+@aIJ_TO_LATLON%LAT+MAP_UTILS+|+@aIJ_TO_LATLON%LON+MAP_UTILS"+rMAX_SOURCE_LEVELS$.,@CURRENT_NEST_NUMBERn,@SOURCE_PROJ,PROJ_STACKa-@COMPUTED_PROJ -@COMPUTED_DOMAIN'-PUSH_SOURCE_PROJECTION3/@aPUSH_SOURCE_PROJECTION%IPROJECTION6/@aPUSH_SOURCE_PROJECTION%USER_STAND_LON50@aPUSH_SOURCE_PROJECTION%USER_TRUELAT15@0@aPUSH_SOURCE_PROJECTION%USER_TRUELAT210@aPUSH_SOURCE_PROJECTION%USER_DXKM10@aPUSH_SOURCE_PROJECTION%USER_DYKM11@aPUSH_SOURCE_PROJECTION%USER_DLAT1@1@aPUSH_SOURCE_PROJECTION%USER_DLON41@aPUSH_SOURCE_PROJECTION%USER_KNOWN_X41@aPUSH_SOURCE_PROJECTION%USER_KNOWN_Y62@aPUSH_SOURCE_PROJECTION%USER_KNOWN_LAT6@2@aPUSH_SOURCE_PROJECTION%USER_KNOWN_LON52@aPUSH_SOURCE_PROJECTION%USER_POLE_LAT52@aPUSH_SOURCE_PROJECTION%USER_POLE_LON63@aPUSH_SOURCE_PROJECTION%USER_CENTERLAT6@3@aPUSH_SOURCE_PROJECTION%USER_CENTERLON43@aPUSH_SOURCE_PROJECTION%USER_CENTERI43@aPUSH_SOURCE_PROJECTION%USER_CENTERJ44@aPUSH_SOURCE_PROJECTION%EARTH_RADIUS&@4HPOP_SOURCE_PROJECTION&4qSET_DOMAIN_PROJECTION25@aSET_DOMAIN_PROJECTION%IPROJECTION596@aSET_DOMAIN_PROJECTION%USER_STAND_LON4y6@aSET_DOMAIN_PROJECTION%USER_TRUELAT146@aSET_DOMAIN_PROJECTION%USER_TRUELAT206@aSET_DOMAIN_PROJECTION%USER_DXKM097@aSET_DOMAIN_PROJECTION%USER_DYKM0y7@aSET_DOMAIN_PROJECTION%USER_DLAT07@aSET_DOMAIN_PROJECTION%USER_DLON07@aSET_DOMAIN_PROJECTION%USER_XDIM098@aSET_DOMAIN_PROJECTION%USER_YDIM3y8@aSET_DOMAIN_PROJECTION%USER_KNOWN_X38@aSET_DOMAIN_PROJECTION%USER_KNOWN_Y58@aSET_DOMAIN_PROJECTION%USER_KNOWN_LAT599@aSET_DOMAIN_PROJECTION%USER_KNOWN_LON4y9@aSET_DOMAIN_PROJECTION%USER_POLE_LAT49@aSET_DOMAIN_PROJECTION%USER_POLE_LON39@aSET_DOMAIN_PROJECTION%EARTH_RADIUS9:XSELECT_DOMAIN):@aSELECT_DOMAIN%DOMAIN_NUM%:PIGET_SELECTED_DOMAIN!;LLTOXY;@aLLTOXY%XLAT;@aLLTOXY%XLON%<@aLLTOXY%Xe<@aLLTOXY%Y<@aLLTOXY%STAGGER<@aLLTOXY%COMP_LL%=XYTOLL=@aXYTOLL%X=@aXYTOLL%Y)>@aXYTOLL%XLATi>@aXYTOLL%XLON>@aXYTOLL%STAGGER>@aXYTOLL%COMP_LL