๐Ÿ’จ 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โ‚‚ = 1.000 (CHOKED)
Choking Length: Lmax = 1.52 m | Duct: 5.0 m
โšก Sonic Choke
Exit Static Pressure (Pโ‚‚) 4.21 bar Inlet Pโ‚ = 8.14 bar
Exit Stagnation Pressure (Pโ‚€โ‚‚) 7.97 bar Total Loss: 20.3 %
Exit Static Temperature (Tโ‚‚) 258.3 K -14.8 ยฐC
Sonic Choking Limit (Lmax) 1.5 m 4fL*/D = 0.728

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

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

=================================================================
 THERMOFLUIDCALC โ€” COMPRESSIBLE FANNO DUCT FLOW REPORT
=================================================================
Case Title                 : High-Speed Safety Relief Blowdown Exhaust Duct
Duct Geometry              : Diam D = 50.0 mm, Length L = 5.00 m (Friction f = 0.0060)
Inlet Conditions           : M1 = 0.550, P01 = 10.00 bar, T01 = 310.0 K, gamma = 1.40
-----------------------------------------------------------------
EXIT MACH NUMBER (M2)      : 1.0000 (SONIC CHOKE AT EXIT)
Maximum Choking Length Lmax: 1.52 meters
Static Pressure P1 -> P2   : 8.142 bar -> 4.210 bar (Drop = 48.3%)
Total Pressure P01 -> P02  : 10.000 bar -> 7.968 bar (Loss = 20.3%)
Static Temperature T1 -> T2: 292.3 K -> 258.3 K (19.2 C -> -14.8 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$).