£dk820309¨s69 netcdf_io.f90NETCDF_IO NETCDFGETREALNETCDFGETINTNETCDFPUTREALNETCDFPUTINTgen@GET_TEXTgen@GET_INTgen@GET_REALgen@PUT_TEXTgen@PUT_INTgen@PUT_REALgen@GETgen@PUT €@ €  €@  @  u NETCDFGETTEXTGET_TEXT_7P%@ X NETCDFGETTEXT%PRESENTVARBUFFERBUFLENLIMITPRESENT @ANC_VARIABLE, Da p5Op5Op  A$NC_LIMIT'D X GET_TEXT_7P%PRESENTVARLIMIT&&&&&&&PRESENT @@NC_VARIABLE A$NC_LIMIT u NETCDFGETINTGET_INT_7P(D X GET_INT_7P%PRESENTVARLIMIT&&&&&&&PRESENT @@NC_VARIABLE A$NC_LIMIT u NETCDFGETREALGET_REAL_7P(D X  GET_REAL_7P%PRESENTVARLIMIT&&&&&&&PRESENT @@NC_VARIABLE A$NC_LIMIT u NETCDFPUTTEXT%@ X NETCDFPUTTEXT%DC_CHARSNETCDFPUTTEXT%LENNETCDFPUTTEXT%PRESENTVARBUFBUFLENLIMIT LENPRESENT @ANC_VARIABLE, @ p5Op5Op1  A$NC_LIMIT u NETCDFPUTINT u NETCDFPUTREAL u GET_REAL_1GET_REAL_2GET_REAL_7#@ XGET_REAL_1%PRESENTVARARRAYLIMITFAILPRESENT ANC_VARIABLEDP & A$NC_LIMITFA#@ XGET_REAL_2%PRESENTVARARRAYLIMITFAILPRESENT ANC_VARIABLEDP && A$NC_LIMITFA#@ XGET_REAL_7%PRESENTVARARRAYLIMITFAILPRESENT ANC_VARIABLEDP &&&&&&& A$NC_LIMITFA u NETCDFPUTREAL1DNETCDFPUTREAL3DNETCDFPUTREAL7D#@ XNETCDFPUTREAL1D%PRESENTVARARRAYLIMITFAILPRESENT @NC_VARIABLE @ #& @$NC_LIMITFA#@ XNETCDFPUTREAL3D%PRESENTVARARRAYLIMITFAILPRESENT @NC_VARIABLE$ @ "&&& @$NC_LIMITFA#@ XNETCDFPUTREAL7D%PRESENTVARARRAYLIMITFAILPRESENT @NC_VARIABLE$ @ !&&&&&&& @$NC_LIMITFA%@  X NETCDFGETREAL%PRESENTVARBUFFERBUFLENLIMITPRESENT @ANC_VARIABLE DA p5Op5Op  A$NC_LIMIT%@  X NETCDFGETINT%PRESENTVARBUFFERBUFLENLIMITPRESENT @ANC_VARIABLE DAp5Op5Op  A$NC_LIMIT%@  X NETCDFPUTREAL%PRESENTVARBUFFERBUFLENLIMITPRESENT @ANC_VARIABLE  p5Op5Op  A$NC_LIMIT%@  X NETCDFPUTINT%PRESENTVARBUFFERBUFLENLIMITPRESENT @ANC_VARIABLE p5Op5Op  A$NC_LIMIT¬ fn#fnÌžbuapp(NETCDF_IOj4JNETCDF_ERRORž4JNETCDF_V3 Ò4JNETCDF_VARIABLE4JNETCDF_SLICE:Ngen@GET_TEXTˆnNETCDFGETTEXT&ö4NETCDFGETTEXT%PRESENT"*@aNETCDFGETTEXT%VAR%j€aNETCDFGETTEXT%BUFFER%ê0aNETCDFGETTEXT%BUFLEN$=aNETCDFGETTEXT%LIMITWîGET_TEXT_7P$E4GET_TEXT_7P%PRESENT y@aGET_TEXT_7P%VAR"¹=aGET_TEXT_7P%LIMITöLgen@GET_INTBéGET_INT_7P#+4GET_INT_7P%PRESENT_@aGET_INT_7P%VAR!Ÿ=aGET_INT_7P%LIMITÜNgen@GET_REAL*êGET_REAL_7P$ 4GET_REAL_7P%PRESENT H @aGET_REAL_7P%VAR"ˆ =aGET_REAL_7P%LIMITÅ Bgen@PUT_TEXT ”NETCDFPUTTEXT'› 4KNETCDFPUTTEXT%DC_CHARS"Ï 0NETCDFPUTTEXT%LEN&ÿ 4NETCDFPUTTEXT%PRESENT"3 @aNETCDFPUTTEXT%VAR"s €aNETCDFPUTTEXT%BUF%ó 0aNETCDFPUTTEXT%BUFLEN$# =aNETCDFPUTTEXT%LIMIT` Agen@PUT_INT¡ Bgen@PUT_REALã Ugen@GET8 dGET_REAL_1#œ 4GET_REAL_1%PRESENTÐ @aGET_REAL_1%VAR!`aGET_REAL_1%ARRAY!p=aGET_REAL_1%LIMIT ­0aGET_REAL_1%FAILÝdGET_REAL_2#A4GET_REAL_2%PRESENTu@aGET_REAL_2%VAR!µpaGET_REAL_2%ARRAY!%=aGET_REAL_2%LIMIT b0aGET_REAL_2%FAIL’dGET_REAL_7#ö4GET_REAL_7%PRESENT*@aGET_REAL_7%VAR!jÀaGET_REAL_7%ARRAY!*=aGET_REAL_7%LIMIT g0aGET_REAL_7%FAIL—dgen@PUT ûiNETCDFPUTREAL1D(d4NETCDFPUTREAL1D%PRESENT$˜@aNETCDFPUTREAL1D%VAR&Ø`aNETCDFPUTREAL1D%ARRAY&8=aNETCDFPUTREAL1D%LIMIT%u0aNETCDFPUTREAL1D%FAIL ¥iNETCDFPUTREAL3D(4NETCDFPUTREAL3D%PRESENT$B@aNETCDFPUTREAL3D%VAR&‚€aNETCDFPUTREAL3D%ARRAY&=aNETCDFPUTREAL3D%LIMIT%?0aNETCDFPUTREAL3D%FAIL oiNETCDFPUTREAL7D(Ø4NETCDFPUTREAL7D%PRESENT$ @aNETCDFPUTREAL7D%VAR&LÀaNETCDFPUTREAL7D%ARRAY& =aNETCDFPUTREAL7D%LIMIT%I0aNETCDFPUTREAL7D%FAILynNETCDFGETREAL&ç4NETCDFGETREAL%PRESENT"@aNETCDFGETREAL%VAR%[|aNETCDFGETREAL%BUFFER%×0aNETCDFGETREAL%BUFLEN$=aNETCDFGETREAL%LIMITDmNETCDFGETINT%±4NETCDFGETINT%PRESENT!å@aNETCDFGETINT%VAR$%|aNETCDFGETINT%BUFFER$¡0aNETCDFGETINT%BUFLEN#Ñ=aNETCDFGETINT%LIMITnNETCDFPUTREAL&|4NETCDFPUTREAL%PRESENT"°@aNETCDFPUTREAL%VAR%ð|aNETCDFPUTREAL%BUFFER%l0aNETCDFPUTREAL%BUFLEN$œ=aNETCDFPUTREAL%LIMITÙmNETCDFPUTINT%F4NETCDFPUTINT%PRESENT!z@aNETCDFPUTINT%VAR$º|aNETCDFPUTINT%BUFFER$60aNETCDFPUTINT%BUFLEN#f=aNETCDFPUTINT%LIMIT