๐Ÿชจ Porous Media Convection (Darcy-Forchheimer)

Compute convective heat transfer in saturated porous media: porous Nusselt number, Darcy-Forchheimer non-linear pressure drop, filtration pumping power, and porous Rayleigh Ra_K.

โšก Fortran 90 Engine Double Precision (IEEE 754) โœ“ ISO / ASME Validated
Porous Media Convection (Darcy-Forchheimer) Convection
๐Ÿ“Š Solver Telemetry โ— ACTIVE
๐Ÿ‘๏ธ Views 37
โšก Solves 30
๐Ÿ’พ Downloads 470 ๐Ÿ“ฆ Fortran Code 10.8 KB
๐Ÿ“… Released Jun 2026
โฑ๏ธ Latency < 1 ms
โšก TOOLS & REPORTS:
๐Ÿ’พ Download Fortran 90
๐Ÿ’ก Hardware & Sizing Partner: Need to size a control valve or check ASME flange bolt torque for this line?
FLOWKS IEC 60534 Sizer โ†— • API 6D Valve Catalog →

๐Ÿชจ Saturated Porous Matrix & Interstitial Seepage Flow

Real-time visual simulation of fluid filtration through packed grains, Darcy pressure drop & thermal dispersion

๐Ÿ“ Configuration & Presets

โ™จ๏ธ Geothermal Aquifer ๐Ÿงช Catalytic Packed Bed ๐Ÿงฝ Metal Foam Heat Sink ๐Ÿงฑ Wall Fibrous Insulation
๐Ÿ“ Bed Geometry & Porous Structure
1 Darcy โ‰ˆ 9.87ร—10โปยนยณ mยฒ
โšก Flow Velocity & Temperatures
๐Ÿงช Solid & Fluid Thermal Properties
Darcy-Forchheimer Convection Formulation:
โ€ข Effective Conductivity: ke = ฯ† kf + (1 โˆ’ ฯ†) ks
โ€ข Pressure Drop: ฮ”P = [ (ฮผ/K) UD + ฯ (CF/โˆšK) UDยฒ ] ยท H
โ€ข Porous Nusselt: Nu = โˆš(1 + 0.318 PeK) | PeK = UD H / ฮฑe
โ€ข Porous Rayleigh: RaK = (ฯ g ฮฒ ฮ”T K H) / (ฮผ ฮฑe)

๐Ÿ“Š Porous Convection Results

Configure inputs and click Compute to view results.

๐Ÿ“˜ Calculation Methodology & Porous Convection Standards

Darcy-Forchheimer Model

Combines linear viscous drag (Darcy law) and non-linear quadratic form drag (Forchheimer inertial term):

โˆ‡P = โˆ’ (ฮผ/K) UD โˆ’ ฯ (CF/โˆšK) UDยฒ

Effective Thermal Conductivity

Represents the parallel/series mixture volume average of solid matrix and interstitial saturated fluid ($k_e = \phi k_f + (1-\phi) k_s$).

Key Engineering Assumptions

  • Homogeneous, isotropic porous matrix.
  • Local thermal equilibrium between fluid and solid phases ($T_f = T_s$).
  • Laminar and transitional filtration velocities ($Re_K = \frac{U_D \sqrt{K}}{\nu} < 10$).