  $  ^   k820309    M          9.1         H                                                                                                       
       basicset_3d.f90 BASICSET_3D                  @                       
       DP                  @                       
       FILEOPEN                  @                       
       MESSAGENOTIFY                                          
       GASRUNIV CHEMDATA_ONESPCID CHEMDATA_CPPERMOLREF CHEMDATA_MOLWT                                          
       DIMXMIN DIMXMAX DIMYMIN DIMYMAX DIMZMIN DIMZMAX SPCNUM      @  "                              u #FILEOPEN                                             u #MESSAGENOTIFYC    #MESSAGENOTIFYI                                     	                                         #     @  "                                        #FILEOPEN%TRIM 
   #UNIT    #FILE    #MODE    #ERR              @                    
     TRIM         @                                    
   @                                 1       
  @                                 1         @                                                                   
         
         T㥛Ġ @        8.314D0%     @                                            #CHEMDATA_ONESPCID%SIZE    #SPCSYMBOL                                        SIZE       
                                                    !                              
  p      p        p                          !                              
  p      p        p                                                                                                                                                                                                                                                                    @     !                            #     @     @                                    #MESSAGENOTIFYC%TRIM    #LEVEL    #WHERE    #MESSAGE    #I     #R !   #D "   #L #   #N $   #C1 %   #C2 &   #C3 '   #CA (             @                         TRIM       
   @                                 1       
   @                                 1       
   @                                 1       
  @                                            &                             
  @                      !           	          &                             
  @                     "           
          &                             
  @                      #                     &                             
  @                      $                     &                             
  @                     %            1       
  @                     &            1       
  @                     '            1 ,      
  @                     (                      &                       1 #     @     @                                     #MESSAGENOTIFYI%PRESENT )   #NUMBER *   #WHERE +   #MESSAGE ,   #I -   #R .   #D /   #L 0   #N 1   #C1 2   #C2 3   #C3 4   #CA 5             @                    )     PRESENT       
   @                      *             
   @                     +            1       
  @                     ,            1       
  @                      -                     &                             
  @                      .           	 	         &                             
  @                     /           
 
         &                             
  @                      0                     &                             
  @                      1                     &                             
  @                     2            1       
  @                     3            1       
  @                     4            1 ,      
  @                     5                      &                       1       @@                       6     
         @@                       7     
         @@                       8     
         @@                       9     
          @                       :     
          @                       ;     
          @                       <     
          @                       =     
          @                       >     
        @                        ?                   &                            @                       @           
        &                            @                       A           
        &           &           &                            @                       B           
        &           &           &                            @                       C           
        &           &           &                            @                       D           
        &           &           &                            @                       E           
        &           &           &                            @                       F           
        &           &           &                             @@                       G     
      
  p      p 
       p 
             +      @@                       H     
        p      p 
       p 
                       @@                       I     
         @@                       J     
         @@@                      K              @@                      L     
         @@                      M     
   #     @                          N                   #XYZ_PRESS O   #XYZ_EXNER P   #XYZ_TEMP Q   #XYZ_POTTEMP R   #XYZ_DENS S   #XYZ_VELSOUND T        
                         O            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p                   
                         P            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p                   
                         Q            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p                   
                         R            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p                   
                         S            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p                   
                         T            
        5 r      5 r    5 r    p    5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        5 r    5 r    p        5 r    5 r    p              #     @                          U                  #BASICSET_INIT%TRIM V   #BASICSET_INIT%MAX W   #BASICSET_INIT%INDEX X   #BASICSET_INIT%DOT_PRODUCT Y   #BASICSET_INIT%COUNT Z   #CFGFILE [                                  V     TRIM                                W     MAX                                X     INDEX                                Y     DOT_PRODUCT                                Z     COUNT       
@ @                      [            1       $      fn#fn       7   J  DC_TYPES       =   J  DC_IOUNIT    4  B   J  DC_MESSAGE    v  s   J  CHEMDATA      k   J  GRIDSET_3D '   T  B       gen@FILEOPEN+DC_IOUNIT -     \       gen@MESSAGENOTIFY+DC_MESSAGE      T       DP+DC_TYPES #   F  v       FILEOPEN+DC_IOUNIT -     1      FILEOPEN%TRIM+DC_IOUNIT=TRIM (     0   e   FILEOPEN%UNIT+DC_IOUNIT (     8   e   FILEOPEN%FILE+DC_IOUNIT (   U  8   e   FILEOPEN%MODE+DC_IOUNIT '     0   e   FILEOPEN%ERR+DC_IOUNIT "     [       GASRUNIV+CHEMDATA +     k       CHEMDATA_ONESPCID+CHEMDATA 5     1      CHEMDATA_ONESPCID%SIZE+CHEMDATA=SIZE 5     8   a   CHEMDATA_ONESPCID%SPCSYMBOL+CHEMDATA .     h       CHEMDATA_CPPERMOLREF+CHEMDATA (   T  h       CHEMDATA_MOLWT+CHEMDATA +     0       DIMXMIN+X_BASE_MODULE=IMIN +     0       DIMXMAX+X_BASE_MODULE=IMAX +     0       DIMYMIN+Y_BASE_MODULE=JMIN +   L  0       DIMYMAX+Y_BASE_MODULE=JMAX +   |  0       DIMZMIN+Z_BASE_MODULE=KMIN +     0       DIMZMAX+Z_BASE_MODULE=KMAX "     0      SPCNUM+GRIDSET_3D 9           MESSAGENOTIFYC+DC_MESSAGE=MESSAGENOTIFYC 4     1      MESSAGENOTIFYC%TRIM+DC_MESSAGE=TRIM 0     8   e   MESSAGENOTIFYC%LEVEL+DC_MESSAGE 0   0	  8   e   MESSAGENOTIFYC%WHERE+DC_MESSAGE 2   h	  8   e   MESSAGENOTIFYC%MESSAGE+DC_MESSAGE ,   	  `   e   MESSAGENOTIFYC%I+DC_MESSAGE ,    
  `   e   MESSAGENOTIFYC%R+DC_MESSAGE ,   `
  `   e   MESSAGENOTIFYC%D+DC_MESSAGE ,   
  `   e   MESSAGENOTIFYC%L+DC_MESSAGE ,      `   e   MESSAGENOTIFYC%N+DC_MESSAGE -     8   e   MESSAGENOTIFYC%C1+DC_MESSAGE -     8   e   MESSAGENOTIFYC%C2+DC_MESSAGE -     8   e   MESSAGENOTIFYC%C3+DC_MESSAGE -   (  d   e   MESSAGENOTIFYC%CA+DC_MESSAGE 9           MESSAGENOTIFYI+DC_MESSAGE=MESSAGENOTIFYI :   K  4      MESSAGENOTIFYI%PRESENT+DC_MESSAGE=PRESENT 1     0   e   MESSAGENOTIFYI%NUMBER+DC_MESSAGE 0     8   e   MESSAGENOTIFYI%WHERE+DC_MESSAGE 2     8   e   MESSAGENOTIFYI%MESSAGE+DC_MESSAGE ,     `   e   MESSAGENOTIFYI%I+DC_MESSAGE ,     `   e   MESSAGENOTIFYI%R+DC_MESSAGE ,     `   e   MESSAGENOTIFYI%D+DC_MESSAGE ,   ?  `   e   MESSAGENOTIFYI%L+DC_MESSAGE ,     `   e   MESSAGENOTIFYI%N+DC_MESSAGE -     8   e   MESSAGENOTIFYI%C1+DC_MESSAGE -   7  8   e   MESSAGENOTIFYI%C2+DC_MESSAGE -   o  8   e   MESSAGENOTIFYI%C3+DC_MESSAGE -     d   e   MESSAGENOTIFYI%CA+DC_MESSAGE      0      GRAV    ;  0      TEMPSFC    k  0      PRESSSFC      0      PRESSBASIS      0       CPDRY      0       CPDRYMOL    +  0       CVDRY    [  0       MOLWTDRY      0       GASRDRY      \       SPCWETID      \       MOLWTWET    s  |       XYZ_DENSBASICZ       |       XYZ_PRESSBASICZ     k  |       XYZ_EXNERBASICZ      |       XYZ_TEMPBASICZ "   c  |       XYZ_POTTEMPBASICZ #     |       XYZ_VELSOUNDBASICZ    [  h      SPCWETMOLFR      l      SPCWETSYMBOL    /  0      TROPOPAUSE    _  0      HUMIDITY      0      ENVTYPE      0      TEMPSTRAT      0      DHIGHT #            BASICSETARRAY_INIT -       a   BASICSETARRAY_INIT%XYZ_PRESS -   l    a   BASICSETARRAY_INIT%XYZ_EXNER ,        a   BASICSETARRAY_INIT%XYZ_TEMP /       a   BASICSETARRAY_INIT%XYZ_POTTEMP ,       a   BASICSETARRAY_INIT%XYZ_DENS 0   <!    a   BASICSETARRAY_INIT%XYZ_VELSOUND    "         BASICSET_INIT #   #  1      BASICSET_INIT%TRIM "   #  0      BASICSET_INIT%MAX $   $  2      BASICSET_INIT%INDEX *   L$  8      BASICSET_INIT%DOT_PRODUCT $   $  2      BASICSET_INIT%COUNT &   $  8   a   BASICSET_INIT%CFGFILE 