CMAQ v.5.3.1 IPR cloud process problem

Hi HyeonYeong,

Try the following two updates in the file VOLINORG.F:

  1. Somewhere near line 1102, comment the line:

    PRECURSOR_CONC( SULF_IDX ) = REAL( XH2SO4, 8 )
    
  2. Somewhere near lines 1676-1677, add the lines:

        PRECURSOR_CONC( SULF_IDX ) = PRECURSOR_CONC( SULF_IDX )
    &                            +SUM( -DELSO4(:) * H2SO4RAT )
    

    These lines for (2) should be added after the comment reading “Update gas-phase concentrations from Aitken and Accumulation Mode Partitioning” and before the the lines:

        PRECURSOR_CONC( NH3_IDX )  = GNH3R8 + sum( CINORG( KNH4,1:2 )
    &                            -CFINAL( KNH4,1:2 ) ) * NH3RAT 
    

Good luck!
Ben

1 Like