Skip to content

Commit a8d344c

Browse files
committed
Apply list_idx changes to new code in cam6_4_162
1 parent f9591e1 commit a8d344c

1 file changed

Lines changed: 3 additions & 3 deletions

File tree

src/chemistry/aerosol/bulk_aerosol_state_mod.F90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -331,7 +331,7 @@ function dry_volume(self, aero_props, bin_idx, ncol, nlev) result(vol)
331331
real(r8) :: dens ! kg/m3
332332

333333
call aero_props%get(bin_idx, 1, density=dens)
334-
call self%get_ambient_mmr(list_idx, 1, bin_idx, mmr)
334+
call self%get_ambient_mmr(species_ndx=1, bin_ndx=bin_ndx, mmr=mmr)
335335

336336
vol(:ncol,:nlev) = mmr(:ncol,:nlev)/dens
337337

@@ -351,8 +351,8 @@ function wet_volume(self, aero_props, bin_idx, ncol, nlev) result(vol)
351351

352352
real(r8) :: vol(ncol,nlev) ! m3/kg
353353

354-
vol = self%dry_volume(aero_props, list_idx, bin_idx, ncol, nlev) &
355-
+ self%water_volume(aero_props, list_idx, bin_idx, ncol, nlev)
354+
vol = self%dry_volume(aero_props, bin_idx, ncol, nlev) &
355+
+ self%water_volume(aero_props, bin_idx, ncol, nlev)
356356

357357
end function wet_volume
358358

0 commit comments

Comments
 (0)