
  (  2   k820309              16.0        >ìöU                                                                                                           
       rpmares_mod.F RPMARES_MOD       
       HNO3_SAV GET_HNO3 SET_HNO3 RPMARES AWATER POLY4 POLY6 CUBIC ACTCOF INIT_RPMARES          @ @@                                                
                &                   &                   &                                           %         @    @                                               
       #I    #J    #L              
  @                                                    
  @                                                    
  @                                          #         @     @                                                #I    #J    #L 	   #HNO3_UGM3 
             
                                                       
                                                       
                                  	                     
                                 
     
      #         @     @                                             
   #SO4    #GNO3    #GNH3    #RH    #TEMP    #ASO4    #AHSO4    #ANO3    #AH2O    #ANH4                                                   
                 D @                                   
                 D @                                   
                                                      
                  @                                   
                 D @                                   
                 D @                                   
                 D @                                   
                 D @                                   
                 D @                                   
       #         @     @                                                #IRHX    #MSO4    #MNH4    #MNO3    #WH2O                                                                      @                                   
                  @                                   
                  @                                   
                 D                                     
       %         @    @                                               
       #A    #X              
                                                    
    p          p            p                                    
                                      
      %         @    @                                               
       #A     #X !             
                                                     
    p          p            p                                    
                                 !     
      #         @     @                            "                    #A2 #   #A1 $   #A0 %   #NR &   #CRUTES '                                             #     
                                                 $     
                                                 %     
                 D                                 &                      D                                '                   
     p          p            p                          #         @     @                            (                    #CAT )   #AN *   #GAMA +   #MOLNU ,   #PHIMULT -                                             )                   
     p          p            p                                                                    *                   
     p          p            p                                    D                                +                   
     p          p          p            p          p                                                                    ,     
                                                 -     
       #         @     @                            .                                                                                                                      #         @                                   /                                                                                                              #         @                                   0                            "      fn#fn !   Â   `   b   uapp(RPMARES_MOD    "  ¼       HNO3_SAV    Þ  e       GET_HNO3    C  @   a   GET_HNO3%I    ƒ  @   a   GET_HNO3%J    Ã  @   a   GET_HNO3%L      l       SET_HNO3    o  @   a   SET_HNO3%I    ¯  @   a   SET_HNO3%J    ï  @   a   SET_HNO3%L #   /  @   a   SET_HNO3%HNO3_UGM3    o  ª       RPMARES      @   a   RPMARES%SO4    Y  @   a   RPMARES%GNO3    ™  @   a   RPMARES%GNH3    Ù  @   a   RPMARES%RH      @   a   RPMARES%TEMP    Y  @   a   RPMARES%ASO4    ™  @   a   RPMARES%AHSO4    Ù  @   a   RPMARES%ANO3      @   a   RPMARES%AH2O    Y  @   a   RPMARES%ANH4    ™  z       AWATER      @   a   AWATER%IRHX    S  @   a   AWATER%MSO4    “  @   a   AWATER%MNH4    Ó  @   a   AWATER%MNO3    	  @   a   AWATER%WH2O    S	  ^       POLY4    ±	  ”   a   POLY4%A    E
  @   a   POLY4%X    …
  ^       POLY6    ã
  ”   a   POLY6%A    w  @   a   POLY6%X    ·  t       CUBIC    +  @   a   CUBIC%A2    k  @   a   CUBIC%A1    «  @   a   CUBIC%A0    ë  @   a   CUBIC%NR    +  ”   a   CUBIC%CRUTES    ¿  {       ACTCOF    :  ”   a   ACTCOF%CAT    Î  ”   a   ACTCOF%AN    b  ´   a   ACTCOF%GAMA      @   a   ACTCOF%MOLNU    V  @   a   ACTCOF%PHIMULT    –  ©       INIT_RPMARES    ?  ¡       DO_RPMARES     à  H       CLEANUP_RPMARES 