💨 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
📊 Solver Telemetry ● ACTIVE
👁️ Consultations 35
⚡ Calculs faits 30
💾 Téléchargements 195 📦 Code Fortran 4.4 KB
📅 Mise en service Jun 2026
⏱️ Latence < 1 ms
⚡ Outils & Rapports :
💾 Télécharger Fortran 90

💨 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.216
Choking Length: Lmax = 2.29 m | Duct: 2.0 m
✅ Unchoked Flow
Exit Static Pressure (P₂) 0.99 bar Inlet P₁ = 0.51 bar
Exit Stagnation Pressure (P₀₂) 2.45 bar Total Loss: 38.6 %
Exit Static Temperature (T₂) 270.1 K -3.1 °C
Sonic Choking Limit (Lmax) 2.3 m 4fL*/D = 0.305

📈 Mach Number M(x) along Duct Length (m)

📉 Pressure Profile (P & P₀ in bar) along Duct

=================================================================
 THERMOFLUIDCALC — COMPRESSIBLE FANNO DUCT FLOW REPORT
=================================================================
Case Title                 : Supersonic Wind Tunnel Duct Fanno Deceleration
Duct Geometry              : Diam D = 120.0 mm, Length L = 2.00 m (Friction f = 0.0040)
Inlet Conditions           : M1 = 2.000, P01 = 4.00 bar, T01 = 350.0 K, gamma = 1.40
-----------------------------------------------------------------
EXIT MACH NUMBER (M2)      : 1.2163
Maximum Choking Length Lmax: 2.29 meters
Static Pressure P1 -> P2   : 0.511 bar -> 0.991 bar (Drop = -93.8%)
Total Pressure P01 -> P02  : 4.000 bar -> 2.454 bar (Loss = 38.6%)
Static Temperature T1 -> T2: 194.4 K -> 270.1 K (-78.7 C -> -3.1 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$).