     9   k820309 M49                                                                                                                                                    
       netcdf_error.f90 NETCDF_ERROR          NC_ERROR ASSERT NETCDFABORT NETCDFLASTERROR NETCDFCLEARERROR u@ERROR i@ i@| gen@MESSAGE gen@ASSERT gen@NETCDFASSERT gen@NETCDFSAVEERROR gen@NC_ERR                                           
                                                 
                                                     o	 NETCDFERRORHAPPENED %     @    X                                         ERROR       
                                    NC_ERROR                                                NETCDFEQUIVALENTERROR %     @    X                                          ERROR STATUS       
                                    NC_ERROR       
                                                                               |  NETCDFSETERRORINT #     @      X                                       ERROR STATUS       D A                                   NC_ERROR       
                                                                            u NETCDFMESSAGEERROR &     @     X                                        NETCDFMESSAGEERROR%TRIM ERROR VARYING_STRING                                       TRIM       
                                    NC_ERROR                                            u NETCDFASSERTERROR #     @      X                                       ERROR       
@ A                                  NC_ERROR                                            u NETCDFASSERTERROR NETCDFASSERTLASTERROR #     @      X                                                                                    u NETCDFSAVEERRORINT NETCDFSAVEERRORCHAR NETCDFSAVEERRORSTRING NETCDFSAVEERRORNC_ERROR #     @      X                                        STATUS WHERE CAUSE       
@ A                                     
@ @                                   1       
                                 #     @      X                                        STATUS WHERE CAUSE       
@ A                                     
@ @                                   1       D @                                    1 #     @      X                                        STATUS WHERE CAUSE       
@ A                                     
@ @                                   1       D @                                    VARYING_STRING #     @      X                                        ERROR       
D A                                   NC_ERROR                                            u NETCDFERRORCC NETCDFERRORCS &     @    X                                        STATUS WHERE CAUSE NC_ERROR       
                                       
@ @                                   1       
@ @                                   1 &     @    X                                        STATUS WHERE CAUSE NC_ERROR       
                                       
@ @                                   1       
                                     VARYING_STRING              @                         '           STATUS WHERE CAUSE                                                                                              VARYING_STRING                                              VARYING_STRING #     @                                            NETCDFABORT%OSLIB STRING                                           
             
@ @                                   VARYING_STRING &     @                                             NC_ERROR #     @                                                     &      fn#fn "         b   uapp(NETCDF_ERROR    s  4   J   NETCDF_V3 #     4   J   ISO_VARYING_STRING      H      u@ERROR $   #  F      NETCDFERRORHAPPENED *   i  =   a   NETCDFERRORHAPPENED%ERROR      J      i@ &     M      NETCDFEQUIVALENTERROR ,   =  =   a   NETCDFEQUIVALENTERROR%ERROR -   z  0   a   NETCDFEQUIVALENTERROR%STATUS      F      i@| "     I      NETCDFSETERRORINT (   9  =   a   NETCDFSETERRORINT%ERROR )   v  0   a   NETCDFSETERRORINT%STATUS      G       gen@MESSAGE #     m      NETCDFMESSAGEERROR (   Z  1      NETCDFMESSAGEERROR%TRIM )     =   a   NETCDFMESSAGEERROR%ERROR      F       gen@ASSERT "     B      NETCDFASSERTERROR (   P  =   a   NETCDFASSERTERROR%ERROR !     \       gen@NETCDFASSERT &     <      NETCDFASSERTLASTERROR $   %         gen@NETCDFSAVEERROR #     O      NETCDFSAVEERRORINT *     0   a   NETCDFSAVEERRORINT%STATUS )   -  8   a   NETCDFSAVEERRORINT%WHERE )   e  0   a   NETCDFSAVEERRORINT%CAUSE $     O      NETCDFSAVEERRORCHAR +     0   a   NETCDFSAVEERRORCHAR%STATUS *   	  8   a   NETCDFSAVEERRORCHAR%WHERE *   L	  8   a   NETCDFSAVEERRORCHAR%CAUSE &   	  O      NETCDFSAVEERRORSTRING -   	  0   a   NETCDFSAVEERRORSTRING%STATUS ,   
  8   a   NETCDFSAVEERRORSTRING%WHERE ,   ;
  C   a   NETCDFSAVEERRORSTRING%CAUSE (   ~
  B      NETCDFSAVEERRORNC_ERROR .   
  =   a   NETCDFSAVEERRORNC_ERROR%ERROR    
  P       gen@NC_ERR    M  \      NETCDFERRORCC %     0   a   NETCDFERRORCC%STATUS $     8   a   NETCDFERRORCC%WHERE $     8   a   NETCDFERRORCC%CAUSE    I  \      NETCDFERRORCS %     0   a   NETCDFERRORCS%STATUS $     8   a   NETCDFERRORCS%WHERE $     C   a   NETCDFERRORCS%CAUSE    P  O       NC_ERROR       8   a   NC_ERROR%STATUS      G   a   NC_ERROR%WHERE      G   a   NC_ERROR%CAUSE    e  U       NETCDFABORT "     4   K   NETCDFABORT%OSLIB #     C   a   NETCDFABORT%STRING     1  I       NETCDFLASTERROR !   z  <       NETCDFCLEARERROR 