arffad - Fanno relations given ρ/ρ*

SUBROUTINE AR06AC(G,D,RESULT,IERR)
  DOUBLE PRECISION G, D, RESULT(8)
  INTEGER IERR

Compute the fanno relations given the density ratio, $ρ/ρ*$ .

Performance
Fixed

Arguments

G - REAL: ENTRY: Specific heat constant $γ$ .
D - REAL: ENTRY: Density ratio $√︁(γ--1)/(γ+-1)≤ ρ/ρ*$ .
RESULT - ARRAY OF REAL: EXIT: Array with result properties as described in 4.
IERR - INTEGER: EXIT: (optional) Return status code.

Status codes