arsefp - Expansion fan properties given p2/p1 and either M1 or M2

SUBROUTINE AR14AB(G,P,M,IS_M2,RESULT,IERR)
  DOUBLE PRECISION G, P, M, RESULT(5)
  LOGICAL IS_M2
  INTEGER IERR

Compute the expansion fan properties given $p2/p1$ and either $M1$ or $M2$ .

Performance
Fixed

Arguments

G - REAL: ENTRY: Specific heat constant $γ$ .
P - REAL: ENTRY: Pressure ratio $p /p 2 1$ .
M - REAL: ENTRY: Either $M ≥1 1$ or $M >0 2$ depending on whether is_m2 is false or true, respectivly.
IS_M2 - BOOLEAN: ENTRY: Whether the given m refers to $M 1$ or $M 2$ .
RESULT - ARRAY OF REAL: EXIT: Array with result properties as described in 12.
IERR - INTEGER: EXIT: (optional) Return status code.

Status codes