Compressible Flow Subroutine Library
Programming Reference Manual
Version 1.0 DD-00008-110E

3.6.8 arffaf - Fanno relations given (4fL)/D
SUBROUTINE AR06AG(G,L,IS_SUB,RESULT,IERR)
  DOUBLE PRECISION G, L, RESULT(8)
  LOGICAL IS_SUB
  INTEGER IERR

Compute the fanno relations given the fanno line, (4fL)/D .

Performance
Iterative

Arguments

G - REAL

ENTRY: Specific heat constant γ .

L - REAL

ENTRY: Fanno line 0≤ (4f L)/D ≤((γ +1)log((γ+1)/(γ-1))-2)/(2γ)  .

IS_SUB - BOOLEAN

ENTRY: Whether M corresponding to the given (4fL)/D is assumed to be sub- or super- sonic.

RESULT - ARRAY OF REAL

EXIT: Array with result properties as described in  4.

IERR - INTEGER

EXIT: (optional) Return status code.

Status codes

-1

Specific heat ratio γ≤ 1  .

-2

Computed M out of range.

-3

Given (4f L)/D out of range.

-4

Iterative solver failed.