๐Ÿ’จ Compressible Fanno Flow with Friction

Model adiabatic compressible duct flow with friction: exit Mach (M2), choking length (Lmax), static and total pressure losses, and temperature variations.

โšก Fortran 90 Engine Double Precision (IEEE 754) โœ“ ISO / ASME Validated
Compressible Fanno Flow with Friction Cfd
๐Ÿ“Š Solver Telemetry โ— ACTIVE
๐Ÿ‘๏ธ Views 35
โšก Solves 30
๐Ÿ’พ Downloads 323 ๐Ÿ“ฆ Fortran Code 4.4 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 →

๐Ÿ’จ Adiabatic Duct Flow Acceleration & Sonic Choking Limit (M = 1.0)

Real-time visual simulation of Mach evolution, wall shear friction & static pressure gradient

๐Ÿ“ Configuration & Presets

๐Ÿ’จ Compressed Air (M = 0.25) ๐Ÿšจ Safety Relief (M = 0.55) โšก Supersonic Tunnel (M = 2.0) ๐Ÿ”ฅ Gas Pipeline (50 bar)
๐Ÿ“ Duct Geometry & Friction
Commercial pipe: 0.004โ€“0.008
๐Ÿš€ Inlet Flow & Stagnation State
Fanno Line Formulations:
โ€ข Choking Parameter: (4fL*/D) = (1โˆ’Mยฒ)/(ฮณMยฒ) + [(ฮณ+1)/(2ฮณ)] ln[(ฮณ+1)Mยฒ / (2 + (ฮณโˆ’1)Mยฒ)]
โ€ข Max Choking Length: Lmax = (4fL*/D)โ‚ ยท D / (4f) [m]
โ€ข Stagnation Pressure Drop: Pโ‚€โ‚‚ / Pโ‚€โ‚ = (Pโ‚€/Pโ‚€*)โ‚‚ / (Pโ‚€/Pโ‚€*)โ‚
โ€ข Wall Friction drives subsonic flows toward M=1 and decelerates supersonic flows.

๐Ÿ“Š Fanno Flow Results

๐Ÿ“Š Output Summary
๐Ÿ’พ Fortran Source

Exit Mach Number (Mโ‚‚)
Mโ‚‚ = 0.179
Choking Length: Lmax = 851.40 m | Duct: 500.0 m
โœ… Unchoked Flow
Exit Static Pressure (Pโ‚‚) 33.10 bar Inlet Pโ‚ = 49.50 bar
Exit Stagnation Pressure (Pโ‚€โ‚‚) 33.85 bar Total Loss: 32.3 %
Exit Static Temperature (Tโ‚‚) 283.2 K 10.0 ยฐC
Sonic Choking Limit (Lmax) 851.4 m 4fL*/D = 45.408

๐Ÿ“ˆ Mach Number M(x) along Duct Length (m)

๐Ÿ“‰ Pressure Profile (P & Pโ‚€ in bar) along Duct

=================================================================
 THERMOFLUIDCALC โ€” COMPRESSIBLE FANNO DUCT FLOW REPORT
=================================================================
Case Title                 : Long-Distance Natural Gas High-Pressure Pipeline
Duct Geometry              : Diam D = 300.0 mm, Length L = 500.00 m (Friction f = 0.0040)
Inlet Conditions           : M1 = 0.120, P01 = 50.00 bar, T01 = 285.0 K, gamma = 1.40
-----------------------------------------------------------------
EXIT MACH NUMBER (M2)      : 0.1792
Maximum Choking Length Lmax: 851.40 meters
Static Pressure P1 -> P2   : 49.499 bar -> 33.095 bar (Drop = 33.1%)
Total Pressure P01 -> P02  : 50.000 bar -> 33.845 bar (Loss = 32.3%)
Static Temperature T1 -> T2: 284.2 K -> 283.2 K (11.0 C -> 10.0 C)
=================================================================

๐Ÿ“˜ Calculation Methodology & Fanno Flow Standards

Fanno Line Thermodynamics

Adiabatic friction in a constant-area duct drives the flow toward maximum entropy, which always occurs at the sonic state ($M=1$):

4fL*/D = (1โˆ’Mยฒ)/(ฮณMยฒ) + [(ฮณ+1)/(2ฮณ)] ln[(ฮณ+1)Mยฒ / (2 + (ฮณโˆ’1)Mยฒ)]

Sonic Choking Phenomenon

If actual duct length $L \ge L_{max}$, the flow chokes at the exit ($M_2 = 1.0$), forcing an inlet pressure buildup and mass flow rate reduction.

Key Engineering Assumptions

  • 1D steady adiabatic flow of ideal gas in constant cross-section duct.
  • Uniform average Fanning friction factor $f$.
  • Calorically perfect gas ($\gamma = 1.40$).