
  lC  ¦   k820309              16.0        ÕëöU                                                                                                           
       wetscav_mod.F WETSCAV_MOD              CLEANUP_WETSCAV COMPUTE_F DO_WETDEP GET_WETDEP_IDWETD GET_WETDEP_NMAX GET_WETDEP_NSOL INIT_WETSCAV WETDEPID WASHOUT LS_K_RAIN LS_F_PRIME H2O2S SO2S          @ @                                                 
                &                   &                   &                                                    @ @                                                 
                &                   &                   &                                           #         @                                                        #         @                                                       #N    #F    #ISOL                                                                                                                         
  @                                                    D @                                   Ğe	            
 
    p Á3        p �         p [         p /           p �         p [         p /                                   D                                             #         @                                                                                                                                                                   %         @                                 	                           #NWET 
             
                                  
           %         @                                                                                                                                                                                                     %         @                                                             #         @                                                                                                                                                                                  #         @                                                                                                                                                              #         @                                                      #L    #N    #BXHEIGHT    #TK    #PP    #DT    #F    #H2O2S    #SO2S    #WASHFRAC    #AER                                                                                                               
                                                       
  @                                                    
                                      
                
  @                                   
                
  @                                   
                
  @                                   
                
  @                                   
                
D @                                   
                 
D @                                   
                 D @                                   
                 D @                                           %         @                                                    
       #Q              
                                      
      %         @                                                    
       #Q    #K_RAIN              
                                      
                
                                      
      #         @     @                                                 #KSTAR298 !   #H298_R "   #TK #   #H2OLIQ $   #L2G %             
                                 !     
                
                                 "     
                
                                 #     
                
                                 $     
                D                                %     
       %         @    @                           &                    
       #Q '   #K_RAIN (   #DT )             
                                 '     
                
                                 (     
                
                                 )     
      %         @    @                           *                    
       #TK +             
                                 +     
      #         @     @                            ,                    #I -   #J .   #L /   #N 0   #K_RAIN 1   #DT 2   #F 3   #RAINFRAC 4                                                                                                              
                                  -                     
                                  .                     
                                  /                     
  @                               0                     
  @                              1     
                
  @                              2     
                
  @                              3     
                D @                              4     
       %         @    @                           5                    
       #K 6   #F 7   #DT 8             
                                 6     
                
                                 7     
                
                                 8     
      #         @     @                            9                    #I :   #J ;   #L <   #N =   #A >   #LS ?   #PDOWN @   #QQ A   #ALPHA B   #ALPHA2 C   #RAINFRAC D   #WASHFRAC E   #MASS_WASH F   #MASS_NOWASH G   #WETLOSS H   #GAINED I   #LOST J   #DSTT K   #STT L                                                                                                         
                                  :                     
                                  ;                     
                                  <                     
                                  =                     
  @                              >                    1           
                                  ?                     
                                 @     
                
                                 A     
                
                                 B     
                
                                 C     
                
                                 D     
                
                                 E     
                
                                 F     
                
                                 G     
                
                                 H     
                
                                 I     
                
                                 J     
                
                                 K     /              
    p          p /           p /                                   
                                 L     /              
    p          p /           p /                         %         @    @                           M                    
       #DT N   #F O   #K_WASH P   #PP Q   #TK R             
                                 N     
                
                                 O     
                
                                 P     
                
                                 Q     
                
                                 R     
      #         @     @                            S                 
   #KSTAR298 T   #H298_R U   #PP V   #DT W   #F X   #DZ Y   #TK Z   #K_WASH [   #WASHFRAC \   #AER ]             
  @                              T     
                
  @                              U     
                
                                 V     
                
                                 W     
                
                                 X     
                
                                 Y     
                
  @                              Z     
                
                                 [     
                D                                \     
                 D                                 ]                          @                              ^                                       2               50              @                             _     
                 
                 3§¨Õ#öI9        1D-32           @  @                             `                       @  @                             a     2                    p          p 2           p 2                                  @ @@                            b                   
                &                   &                                                    @ @@                            c                   
                &                   &                   &                                                    @ @@                            d                   
                &                   &                   &                                                    @ @@                            e                   
                &                   &                   &                                                    @ @@                            f                   
                &                   &                   &                                                    @ @@                            g                   
                &                   &                   &                                           #         @     @                            h                    #LS i                                                                                                              
                                 i           #         @     @                            j                    #LS k                                                                                                         
  @                              k           #         @     @                            l                    #KC m   #F n                                                                                                                        
                                 m     
                D                                n     Ğe	            
     p Á3        p �         p [         p /           p �         p [         p /                         %         @    @                           o                           #N_TEST p                                                                                                                   
                                  p           #         @     @                            q                    #LS r   #I s   #J t   #L u   #IDX v   #ERRMSG w   #F_RAINOUT x   #K_RAIN y   #DT z   #STT {   #DSTT |                                                                                                                                                      
  @                               r                     
  @                               s                     
  @                               t                     
  @                               u                     
                                  v                     
  @                              w                    1           
  @                              x     
                
  @                              y     
                
  @                              z     
                
D @                              {                   
               &                   &                   &                   &                                                     
D                                |                   
               &                   &                   &                   &                                           #         @     @                            }                    #LS ~   #I    #J €   #L �   #IDX ‚   #ERRMSG ƒ   #QDOWN „   #Q …   #F_WASHOUT †   #F_RAINOUT ‡   #DT ˆ   #PDOWN ‰   #STT Š   #DSTT ‹   #REEVAP Œ                                                                                                                                                      
  @                               ~                     
  @                                                    
  @                               €                     
  @                               �                     
                                  ‚                     
  @                              ƒ                    1           
  @                              „     
                
  @                              …     
                
                                 †     
                
                                 ‡     
                
  @                              ˆ     
                
  @                              ‰                   
              &                   &                   &                                                     
D @                              Š                   
               &                   &                   &                   &                                                     
D                                ‹                   
               &                   &                   &                   &                                                     
                                 Œ           #         @     @                            �                 	   #LS �   #I �   #J �   #L ‘   #IDX ’   #ERRMSG “   #DT ”   #STT •   #DSTT –                                                                                                                                                                     
  @                               �                     
  @                               �                     
  @                               �                     
  @                               ‘                     
                                  ’                     
  @                              “                    1           
                                 ”     
                
D @                              •                   
               &                   &                   &                   &                                                     
D                                –                   
               &                   &                   &                   &                                           #         @     @                            —                    #LS ˜   #I ™   #J š   #L ›   #IDX œ   #ERRMSG �   #QDOWN �   #F Ÿ   #DT     #STT ¡   #DSTT ¢                                                                                                                                                                
  @                               ˜                     
  @                               ™                     
  @                               š                     
  @                               ›                     
                                  œ                     
  @                              �                    1           
  @                              �     
                
  @                              Ÿ     
                
  @                                    
                
D @                              ¡                   
               &                   &                   &                   &                                                     
D                                ¢                   
               &                   &                   &                   &                                           #         @     @                             £                    #LS ¤                                                                                                                                       
  @                              ¤                  "      fn#fn !   Â   ¤   b   uapp(WETSCAV_MOD    f  ¼       H2O2S    "  ¼       SO2S     Ş  H       CLEANUP_WETSCAV    &  Ë       COMPUTE_F    ñ  @   a   COMPUTE_F%N    1  Ô   a   COMPUTE_F%F      @   a   COMPUTE_F%ISOL    E  ³       DO_WETDEP "   ø  Z       GET_WETDEP_IDWETD '   R  @   a   GET_WETDEP_IDWETD%NWET     ’  Ù       GET_WETDEP_NMAX     k  P       GET_WETDEP_NSOL    »  Â       INIT_WETSCAV    }  ®       WETDEPID    +	        WASHOUT    ;
  @   a   WASHOUT%L    {
  @   a   WASHOUT%N !   »
  @   a   WASHOUT%BXHEIGHT    û
  @   a   WASHOUT%TK    ;  @   a   WASHOUT%PP    {  @   a   WASHOUT%DT    »  @   a   WASHOUT%F    û  @   a   WASHOUT%H2O2S    ;  @   a   WASHOUT%SO2S !   {  @   a   WASHOUT%WASHFRAC    »  @   a   WASHOUT%AER    û  W       LS_K_RAIN    R  @   a   LS_K_RAIN%Q    ’  c       LS_F_PRIME    õ  @   a   LS_F_PRIME%Q "   5  @   a   LS_F_PRIME%K_RAIN    u         COMPUTE_L2G %   ô  @   a   COMPUTE_L2G%KSTAR298 #   4  @   a   COMPUTE_L2G%H298_R    t  @   a   COMPUTE_L2G%TK #   ´  @   a   COMPUTE_L2G%H2OLIQ     ô  @   a   COMPUTE_L2G%L2G    4  k       CONV_F_PRIME    Ÿ  @   a   CONV_F_PRIME%Q $   ß  @   a   CONV_F_PRIME%K_RAIN       @   a   CONV_F_PRIME%DT    _  X       E_ICE    ·  @   a   E_ICE%TK    ÷  î       RAINOUT    å  @   a   RAINOUT%I    %  @   a   RAINOUT%J    e  @   a   RAINOUT%L    ¥  @   a   RAINOUT%N    å  @   a   RAINOUT%K_RAIN    %  @   a   RAINOUT%DT    e  @   a   RAINOUT%F !   ¥  @   a   RAINOUT%RAINFRAC    å  f       GET_RAINFRAC    K  @   a   GET_RAINFRAC%K    ‹  @   a   GET_RAINFRAC%F     Ë  @   a   GET_RAINFRAC%DT      k      SAFETY    v  @   a   SAFETY%I    ¶  @   a   SAFETY%J    ö  @   a   SAFETY%L    6  @   a   SAFETY%N    v  L   a   SAFETY%A    Â  @   a   SAFETY%LS      @   a   SAFETY%PDOWN    B  @   a   SAFETY%QQ    ‚  @   a   SAFETY%ALPHA    Â  @   a   SAFETY%ALPHA2       @   a   SAFETY%RAINFRAC     B  @   a   SAFETY%WASHFRAC !   ‚  @   a   SAFETY%MASS_WASH #   Â  @   a   SAFETY%MASS_NOWASH      @   a   SAFETY%WETLOSS    B  @   a   SAFETY%GAINED    ‚  @   a   SAFETY%LOST    Â  ”   a   SAFETY%DSTT    V  ”   a   SAFETY%STT !   ê  {       WASHFRAC_AEROSOL $   e  @   a   WASHFRAC_AEROSOL%DT #   ¥  @   a   WASHFRAC_AEROSOL%F (   å  @   a   WASHFRAC_AEROSOL%K_WASH $   %  @   a   WASHFRAC_AEROSOL%PP $   e  @   a   WASHFRAC_AEROSOL%TK !   ¥  ¬       WASHFRAC_LIQ_GAS *   Q  @   a   WASHFRAC_LIQ_GAS%KSTAR298 (   ‘  @   a   WASHFRAC_LIQ_GAS%H298_R $   Ñ  @   a   WASHFRAC_LIQ_GAS%PP $      @   a   WASHFRAC_LIQ_GAS%DT #   Q   @   a   WASHFRAC_LIQ_GAS%F $   ‘   @   a   WASHFRAC_LIQ_GAS%DZ $   Ñ   @   a   WASHFRAC_LIQ_GAS%TK (   !  @   a   WASHFRAC_LIQ_GAS%K_WASH *   Q!  @   a   WASHFRAC_LIQ_GAS%WASHFRAC %   ‘!  @   a   WASHFRAC_LIQ_GAS%AER    Ñ!  r       NSOLMAX    C"  u       EPSILON    ¸"  @       NSOL    ø"  ”       IDWETD    Œ#  ¤       VUD    0$  ¼       C_H2O    ì$  ¼       CLDICE    ¨%  ¼       CLDLIQ    d&  ¼       PDOWN     '  ¼       QQ    Ü'  ±       MAKE_QQ    �(  @   a   MAKE_QQ%LS    Í(  ¬       WETDEP    y)  @   a   WETDEP%LS    ¹)  Â       F_AEROSOL    {*  @   a   F_AEROSOL%KC    »*  Ô   a   F_AEROSOL%F    �+  Â       GET_ISOL     Q,  @   a   GET_ISOL%N_TEST     ‘,  9      DO_RAINOUT_ONLY #   Ê-  @   a   DO_RAINOUT_ONLY%LS "   
.  @   a   DO_RAINOUT_ONLY%I "   J.  @   a   DO_RAINOUT_ONLY%J "   Š.  @   a   DO_RAINOUT_ONLY%L $   Ê.  @   a   DO_RAINOUT_ONLY%IDX '   
/  L   a   DO_RAINOUT_ONLY%ERRMSG *   V/  @   a   DO_RAINOUT_ONLY%F_RAINOUT '   –/  @   a   DO_RAINOUT_ONLY%K_RAIN #   Ö/  @   a   DO_RAINOUT_ONLY%DT $   0  Ô   a   DO_RAINOUT_ONLY%STT %   ê0  Ô   a   DO_RAINOUT_ONLY%DSTT     ¾1  e      DO_WASHOUT_ONLY #   #3  @   a   DO_WASHOUT_ONLY%LS "   c3  @   a   DO_WASHOUT_ONLY%I "   £3  @   a   DO_WASHOUT_ONLY%J "   ã3  @   a   DO_WASHOUT_ONLY%L $   #4  @   a   DO_WASHOUT_ONLY%IDX '   c4  L   a   DO_WASHOUT_ONLY%ERRMSG &   ¯4  @   a   DO_WASHOUT_ONLY%QDOWN "   ï4  @   a   DO_WASHOUT_ONLY%Q *   /5  @   a   DO_WASHOUT_ONLY%F_WASHOUT *   o5  @   a   DO_WASHOUT_ONLY%F_RAINOUT #   ¯5  @   a   DO_WASHOUT_ONLY%DT &   ï5  ¼   a   DO_WASHOUT_ONLY%PDOWN $   «6  Ô   a   DO_WASHOUT_ONLY%STT %   7  Ô   a   DO_WASHOUT_ONLY%DSTT '   S8  @   a   DO_WASHOUT_ONLY%REEVAP #   “8  -      DO_COMPLETE_REEVAP &   À9  @   a   DO_COMPLETE_REEVAP%LS %    :  @   a   DO_COMPLETE_REEVAP%I %   @:  @   a   DO_COMPLETE_REEVAP%J %   €:  @   a   DO_COMPLETE_REEVAP%L '   À:  @   a   DO_COMPLETE_REEVAP%IDX *    ;  L   a   DO_COMPLETE_REEVAP%ERRMSG &   L;  @   a   DO_COMPLETE_REEVAP%DT '   Œ;  Ô   a   DO_COMPLETE_REEVAP%STT (   `<  Ô   a   DO_COMPLETE_REEVAP%DSTT "   4=  :      DO_WASHOUT_AT_SFC %   n>  @   a   DO_WASHOUT_AT_SFC%LS $   ®>  @   a   DO_WASHOUT_AT_SFC%I $   î>  @   a   DO_WASHOUT_AT_SFC%J $   .?  @   a   DO_WASHOUT_AT_SFC%L &   n?  @   a   DO_WASHOUT_AT_SFC%IDX )   ®?  L   a   DO_WASHOUT_AT_SFC%ERRMSG (   ú?  @   a   DO_WASHOUT_AT_SFC%QDOWN $   :@  @   a   DO_WASHOUT_AT_SFC%F %   z@  @   a   DO_WASHOUT_AT_SFC%DT &   º@  Ô   a   DO_WASHOUT_AT_SFC%STT '   �A  Ô   a   DO_WASHOUT_AT_SFC%DSTT    bB  Ê       WETDEP_MERRA     ,C  @   a   WETDEP_MERRA%LS 