a1Jk820309 919.0le  mpas_mesh.f90MPAS_MESH  @ '`#NCID#NUM_VARS#CURRENT_VAR#VARIDS#UNLIMITED_DIMID3030&3yX @ '#NAME #ISTIMEDEPENDENT #VARID #XTYPE #NDIMS #DIMNAMES#DIMLENS#DIMIDS#FILE_HANDLE#ARRAY0R#ARRAY1R#ARRAY2R#ARRAY3R#ARRAY4R#ARRAY0D#ARRAY1D#ARRAY2D#ARRAY3D#ARRAY4D#ARRAY0I#ARRAY1I#ARRAY2I#ARRAY3I @ @3 D3 H3 L3.P@&&&`( #INPUT_HANDLE_TYPE0 8  &3y   &&3y   &&&3y X &&&&3y   &3y 8 &&3y  &&&3y  &&&&3y &3y&&3yP&&&3y  NULL%@ ! #FILENAME"#HANDLE##NRECORDS$ "1#`#INPUT_HANDLE_TYPE$%@ % #HANDLE&#FIELDNAME'#FIELD(  &`#INPUT_HANDLE_TYPE '1(#INPUT_FIELD_TYPE%@ ) #FIELD*#FRAME+ *#INPUT_FIELD_TYPE +%@ , #FIELD- -#INPUT_FIELD_TYPE  .1  /2%@ 0 #HANDLE1 1`#INPUT_HANDLE_TYPE @ 2'8#VALID3#NCELLS4#NVERTICES5#NEDGES6#MAXEDGES7#LANDMASK8#NEDGESONCELL9#CELLSONCELL:#VERTICESONCELL;#CELLSONVERTEX<#EDGESONCELL=#CELLSONEDGE>#LATCELL?#LONCELL@#LATVERTEXA#LONVERTEXB#LATEDGEC#LONEDGED334305306 307308&3y9`&3y:&&3y; &&3y<h &&3y= &&3y>( &&3y?  &3y @ &3y A &3y B` &3y C &3y D &3y %@E #MESH_FILENAMEF#MESHG @F1DG8#MPAS_MESH_TYPE2%@H #MESHI DI8#MPAS_MESH_TYPE2 fn#fn@JSCAN_INPUT-INPUT_HANDLE_TYPE+SCAN_INPUT2HaINPUT_HANDLE_TYPE%NCID+SCAN_INPUT6aINPUT_HANDLE_TYPE%NUM_VARS+SCAN_INPUT9aINPUT_HANDLE_TYPE%CURRENT_VAR+SCAN_INPUT4,aINPUT_HANDLE_TYPE%VARIDS+SCAN_INPUT= HaINPUT_HANDLE_TYPE%UNLIMITED_DIMID+SCAN_INPUT,h~INPUT_FIELD_TYPE+SCAN_INPUT1PaINPUT_FIELD_TYPE%NAME+SCAN_INPUT<6aINPUT_FIELD_TYPE%ISTIMEDEPENDENT+SCAN_INPUT2aINPUT_FIELD_TYPE%VARID+SCAN_INPUT2~aINPUT_FIELD_TYPE%XTYPE+SCAN_INPUT2"aINPUT_FIELD_TYPE%NDIMS+SCAN_INPUT5aINPUT_FIELD_TYPE%DIMNAMES+SCAN_INPUT4b aINPUT_FIELD_TYPE%DIMLENS+SCAN_INPUT3 aINPUT_FIELD_TYPE%DIMIDS+SCAN_INPUT8 gaINPUT_FIELD_TYPE%FILE_HANDLE+SCAN_INPUT4 HaINPUT_FIELD_TYPE%ARRAY0R+SCAN_INPUT49 aINPUT_FIELD_TYPE%ARRAY1R+SCAN_INPUT4- aINPUT_FIELD_TYPE%ARRAY2R+SCAN_INPUT49 $aINPUT_FIELD_TYPE%ARRAY3R+SCAN_INPUT4]<aINPUT_FIELD_TYPE%ARRAY4R+SCAN_INPUT4HaINPUT_FIELD_TYPE%ARRAY0D+SCAN_INPUT4aINPUT_FIELD_TYPE%ARRAY1D+SCAN_INPUT4 aINPUT_FIELD_TYPE%ARRAY2D+SCAN_INPUT4$aINPUT_FIELD_TYPE%ARRAY3D+SCAN_INPUT4<aINPUT_FIELD_TYPE%ARRAY4D+SCAN_INPUT4AHaINPUT_FIELD_TYPE%ARRAY0I+SCAN_INPUT4aINPUT_FIELD_TYPE%ARRAY1I+SCAN_INPUT4} aINPUT_FIELD_TYPE%ARRAY2I+SCAN_INPUT4$aINPUT_FIELD_TYPE%ARRAY3I+SCAN_INPUT =NULL+SCAN_INPUT+xSCAN_INPUT_OPEN+SCAN_INPUT4bLaSCAN_INPUT_OPEN%FILENAME+SCAN_INPUT2_aSCAN_INPUT_OPEN%HANDLE+SCAN_INPUT4 @aSCAN_INPUT_OPEN%NRECORDS+SCAN_INPUT0MvSCAN_INPUT_FOR_FIELD+SCAN_INPUT7_aSCAN_INPUT_FOR_FIELD%HANDLE+SCAN_INPUT:"LaSCAN_INPUT_FOR_FIELD%FIELDNAME+SCAN_INPUT6n^aSCAN_INPUT_FOR_FIELD%FIELD+SCAN_INPUT1fSCAN_INPUT_READ_FIELD+SCAN_INPUT72^aSCAN_INPUT_READ_FIELD%FIELD+SCAN_INPUT7@aSCAN_INPUT_READ_FIELD%FRAME+SCAN_INPUT1CAN_INPUT_FREE_FIELD+SCAN_INPUT7+^aSCAN_INPUT_FREE_FIELD%FIELD+SCAN_INPUT+qFIELD_TYPE_REAL+SCAN_INPUT-qFIELD_TYPE_DOUBLE+SCAN_INPUT,k\SCAN_INPUT_CLOSE+SCAN_INPUT3_aSCAN_INPUT_CLOSE%HANDLE+SCAN_INPUT&\MPAS_MESH_TYPE%aMPAS_MESH_TYPE%VALID&& aMPAS_MESH_TYPE%NCELLS) aMPAS_MESH_TYPE%NVERTICES&p!aMPAS_MESH_TYPE%NEDGES("aMPAS_MESH_TYPE%MAXEDGES("aMPAS_MESH_TYPE%LANDMASK,#aMPAS_MESH_TYPE%NEDGESONCELL+$ aMPAS_MESH_TYPE%CELLSONCELL.% aMPAS_MESH_TYPE%VERTICESONCELL-& aMPAS_MESH_TYPE%CELLSONVERTEX+' aMPAS_MESH_TYPE%EDGESONCELL+( aMPAS_MESH_TYPE%CELLSONEDGE')aMPAS_MESH_TYPE%LATCELL'*aMPAS_MESH_TYPE%LONCELL)+aMPAS_MESH_TYPE%LATVERTEX),aMPAS_MESH_TYPE%LONVERTEX'-aMPAS_MESH_TYPE%LATEDGE'.aMPAS_MESH_TYPE%LONEDGE /mMPAS_MESH_SETUP.0LaMPAS_MESH_SETUP%MESH_FILENAME%O0\aMPAS_MESH_SETUP%MESH0ZMPAS_MESH_FREE$1\aMPAS_MESH_FREE%MESH