diff --git a/Source/type.f90 b/Source/type.f90 index 767a627658..89f38eb5d4 100644 --- a/Source/type.f90 +++ b/Source/type.f90 @@ -89,7 +89,7 @@ MODULE TYPES REAL(EB) :: INITIAL_MASS=-1._EB !< Initial mass of single particle (kg) REAL(EB) :: FTPR !< 4/3 * PI * SPECIES(N)\%DENSITY_LIQUID (kg/m3) REAL(EB) :: FREE_AREA_FRACTION !< Area fraction of cell open for flow in SCREEN_DRAG model - REAL(EB) :: POROUS_VOLUME_FRACTION !< Volume fraction of cell open to flow in porous media model + REAL(EB) :: POROUS_VOLUME_FRACTION !< Volume fraction of cell occupied by porous media in the porous media model REAL(EB) :: MEAN_DROPLET_VOLUME=0._EB !< Mean droplet volume REAL(EB) :: RUNNING_AVERAGE_FACTOR !< Fraction of older value to use for particle statistics summations REAL(EB) :: SHAPE_FACTOR !< Ratio of particle cross sectional area to surface area