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

3.6.7 arffap0 - Fanno relations given p01/p02
SUBROUTINE AR06AF(G,P0,IS_SUB,RESULT,IERR)
  DOUBLE PRECISION G, P0, RESULT(8)
  LOGICAL IS_SUB
  INTEGER IERR

Compute the fanno relations given the stagnation pressure ratio, p01/p02   .

Performance
Iterative

Arguments

G - REAL

ENTRY: Specific heat constant γ .

P0 - REAL

ENTRY: Stagnation pressure ratio 1 ≤p  /p
    02  01   .

IS_SUB - BOOLEAN

ENTRY: Whether M corresponding to the given p  /p
 02 01   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 p01/p02   out of range.

-4

Iterative solver failed.