  Ô  "   k820309    M          9.1         èxH                                                                                                       
       heatflux.f90 HEATFLUX_N1994          XZ_HEATFLUXBULK XZ_MIXRTFLUXBULK      @       €                           
       DIMXMIN DIMXMAX DIMZMIN DIMZMAX REGZMIN DELZ                                          
       XZ_EXNERBASICZ XZ_POTTEMPBASICZ TEMPSFC PRESSSFC CPDRY GASRDRY                  @                       
       XZ_AVR_PZ                  @                       
       SVAPPRESS (    `                                                
#DIMZMAX    #DIMZMIN    #DIMXMAX    #DIMXMIN 	   #PZ_VAR 
     5 r      5 r    5 r    p    5 r      & 5 r    5 r      & 5 r    5 r          5 r    5 r    p        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    p        5 r    5 r    p              %     @                                        
   #SVAPPRESS%MIN    #SVAPPRESS%DLOG    #SVAPPRESS%DEXP    #ID    #TEMP              @                         MIN           @                         DLOG           @                         DEXP       
   @                                   
   @                          
  (    `                                                 
#XZ_HEATFLUXBULK%SQRT    #XZ_HEATFLUXBULK%MAX    #XZ_POTTEMP    #PZ_VELX      5 r      5 r    5 r 	   p    5 r 	     & 5 r 	   5 r      & 5 r    5 r          5 r    5 r 	   p        5 r    5 r    p                        @                         SQRT           @                         MAX      
   @                                 
      5 r      5 r    5 r 	   p    5 r 	     & 5 r 	   5 r      & 5 r    5 r          5 r    5 r 	   p        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 	   p        5 r    5 r    p              (    `                                                 
#XZ_MIXRTFLUXBULK%SQRT    #XZ_MIXRTFLUXBULK%MAX    #XZ_MIXRT    #PZ_VELX    #XZ_EXNER    #ID       5 r      5 r    5 r 	   p    5 r 	     & 5 r 	   5 r      & 5 r    5 r          5 r    5 r 	   p        5 r    5 r    p                        @                         SQRT           @                         MAX      
   @                                 
      5 r      5 r    5 r 	   p    5 r 	     & 5 r 	   5 r      & 5 r    5 r          5 r    5 r 	   p        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 	   p        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 	   p        5 r    5 r    p                    
  @@                                       @                                      @                                      @                                      @                                œ   $      fn#fn $   À   -   b   uapp(HEATFLUX_N1994    í   a   j  GRIDSET    N  s   J  BASICSET    Á  >   J  AVERAGE    ÿ  >   J  CHEMCALC "   =  x      XZ_AVR_PZ+AVERAGE     µ  0     DIMZMAX+GRIDSET     å  0     DIMZMIN+GRIDSET       0     DIMXMAX+GRIDSET     E  0     DIMXMIN+GRIDSET )   u  ,  e   XZ_AVR_PZ%PZ_VAR+AVERAGE #   ¡         SVAPPRESS+CHEMCALC +   .  0      SVAPPRESS%MIN+CHEMCALC=MIN -   ^  1      SVAPPRESS%DLOG+CHEMCALC=DLOG -     1      SVAPPRESS%DEXP+CHEMCALC=DEXP &   À  0   e   SVAPPRESS%ID+CHEMCALC (   ð  0   e   SVAPPRESS%TEMP+CHEMCALC        ˆ      XZ_HEATFLUXBULK %   ¨  1      XZ_HEATFLUXBULK%SQRT $   Ù  0      XZ_HEATFLUXBULK%MAX +   		  ,  a   XZ_HEATFLUXBULK%XZ_POTTEMP (   5
  ,  a   XZ_HEATFLUXBULK%PZ_VELX !   a  ž      XZ_MIXRTFLUXBULK &   ÿ  1      XZ_MIXRTFLUXBULK%SQRT %   0  0      XZ_MIXRTFLUXBULK%MAX *   `  ,  a   XZ_MIXRTFLUXBULK%XZ_MIXRT )   Œ  ,  a   XZ_MIXRTFLUXBULK%PZ_VELX *   ¸  ,  a   XZ_MIXRTFLUXBULK%XZ_EXNER $   ä  0   a   XZ_MIXRTFLUXBULK%ID (     0      DIMZMIN+GRIDSET=DIMZMIN (   D  0      DIMZMAX+GRIDSET=DIMZMAX (   t  0      DIMXMIN+GRIDSET=DIMXMIN (   ¤  0      DIMXMAX+GRIDSET=DIMXMAX 