	  o  (   k820309    Y
          11.1        Ý²ÌQ                                                                                                           
       regrid_1x1_mod.F REGRID_1X1_MOD              CLEANUP_REGRID_1X1 DO_REGRID_G2G_1X1 gen@DO_REGRID_1X1 gen@DO_REGRID_05X0666                                                        u #DO_REGRID_1X1_R4    #DO_REGRID_1X1_R4_2D    #DO_REGRID_1X1_R8    #DO_REGRID_1X1_R8_2D    #         @     @X                                              #DO_REGRID_1X1_R4%DBLE    #L1X1    #UNIT    #INDATA    #OUTDATA                                                                                                                                                                                              @                                 DBLE           
  @@                                                   
  @@                                                 1          
  @@                                                 	 	   p ñÿ        p h        p µ         5 “ p        r        p h        p µ         5 “ p        r                               D @@                                                 
 
    p 9        p H         p .         5 “ p        r        p H         p .         5 “ p        r                      #         @     @X                                              #DO_REGRID_1X1_R4_2D%DBLE    #UNIT 	   #INDATA 
   #OUTDATA                                                                                                                                                                                                                @                                 DBLE           
  @@                             	                    1           
  @@                             
     ˆþ             	    p ñÿ        p h        p µ         p            p h        p µ         p                                    D  @                                  ð             
     p I         p H         p .           p H         p .                         #         @     @X                                               #L1X1    #UNIT    #INDATA    #OUTDATA                                                                                                                                                                                          
  @@                                                   
  @@                                                 1          
  @@                                                 
    p ñÿ        p h        p µ         5 “ p        r        p h        p µ         5 “ p        r                               D @@                                                 
     p 9        p H         p .         5 “ p        r        p H         p .         5 “ p        r                      #         @     @X                                               #UNIT    #INDATA    #OUTDATA                                                                                                                                                                                                            
  @@                                                 1           
  @@                                  ˆþ             
    p ñÿ        p h        p µ         p            p h        p µ         p                                    D  @                                  ð             
     p I         p H         p .           p H         p .                                                                                u #DO_THE_REGRIDDING_05X0666_2D    #DO_THE_REGRIDDING_05X0666_3D    #         @     @X                                               #L05X0666    #UNIT    #INDATA    #OUTDATA                                                                                                                                                                                                                                                                  
   @                                                   
@ @@                                                 1          
   @                                                 
    p ™û       p         p i        5 “ p        r        p         p i        5 “ p        r                                D  @                                  ð             
     p I         p H         p .           p H         p .                         #         @     @X                                               #L05X0666    #UNIT    #INDATA    #OUTDATA                                                                                                                                                                                                                                                                  
   @                                                   
@ @@                                                 1          
   @                                                 
    p ™û       p         p i        5 “ p        r        p         p i        5 “ p        r                               D  @                                                 
     p 9        p H         p .         5 “ p        r        p H         p .         5 “ p        r                      #         @                                                     #CLEANUP_REGRID_1X1%ALLOCATED                   @                                  ALLOCATED #         @                                  !                   #UNIT "   #GEN1X1 #   #GEOS1X1 $                                                                                                                                                                                                                                                                                 
@ @@                             "                    1           
   @                             #      ý             
    p i        p h        p ´           p h        p ´                                   D  @                             $     ˆþ             
     p i        p h        p µ           p h        p µ                                (      fn#fn $   È   ]   b   uapp(REGRID_1X1_MOD "   %  ž       gen@DO_REGRID_1X1 !   Ã  <     DO_REGRID_1X1_R4 &   ÿ  =      DO_REGRID_1X1_R4%DBLE &   <  @   a   DO_REGRID_1X1_R4%L1X1 &   |  L   a   DO_REGRID_1X1_R4%UNIT (   È  ô   a   DO_REGRID_1X1_R4%INDATA )   ¼  ô   a   DO_REGRID_1X1_R4%OUTDATA $   °  G     DO_REGRID_1X1_R4_2D )   ÷  =      DO_REGRID_1X1_R4_2D%DBLE )   4  L   a   DO_REGRID_1X1_R4_2D%UNIT +   €  Ô   a   DO_REGRID_1X1_R4_2D%INDATA ,   T  ´   a   DO_REGRID_1X1_R4_2D%OUTDATA !   	  !     DO_REGRID_1X1_R8 &   )
  @   a   DO_REGRID_1X1_R8%L1X1 &   i
  L   a   DO_REGRID_1X1_R8%UNIT (   µ
  ô   a   DO_REGRID_1X1_R8%INDATA )   ©  ô   a   DO_REGRID_1X1_R8%OUTDATA $   �  )     DO_REGRID_1X1_R8_2D )   Æ  L   a   DO_REGRID_1X1_R8_2D%UNIT +     Ô   a   DO_REGRID_1X1_R8_2D%INDATA ,   æ  ´   a   DO_REGRID_1X1_R8_2D%OUTDATA &   š  „       gen@DO_REGRID_05X0666 -     m     DO_THE_REGRIDDING_05X0666_2D 6   ‹  @   a   DO_THE_REGRIDDING_05X0666_2D%L05X0666 2   Ë  L   a   DO_THE_REGRIDDING_05X0666_2D%UNIT 4     ô   a   DO_THE_REGRIDDING_05X0666_2D%INDATA 5     ´   a   DO_THE_REGRIDDING_05X0666_2D%OUTDATA -   ¿  m     DO_THE_REGRIDDING_05X0666_3D 6   ,  @   a   DO_THE_REGRIDDING_05X0666_3D%L05X0666 2   l  L   a   DO_THE_REGRIDDING_05X0666_3D%UNIT 4   ¸  ô   a   DO_THE_REGRIDDING_05X0666_3D%INDATA 5   ¬  ô   a   DO_THE_REGRIDDING_05X0666_3D%OUTDATA #      j       CLEANUP_REGRID_1X1 -   
  B      CLEANUP_REGRID_1X1%ALLOCATED "   L  o      DO_REGRID_G2G_1X1 '   »  L   a   DO_REGRID_G2G_1X1%UNIT )     ´   a   DO_REGRID_G2G_1X1%GEN1X1 *   »  ´   a   DO_REGRID_G2G_1X1%GEOS1X1 