arsolms - Oblique shock relations given M1 and θ

SUBROUTINE AR11AG(G,M,T,STRONG,RESULT,IERR)
  DOUBLE PRECISION G, M, T, RESULT(10)
  LOGICAL STRONG
  INTEGER IERR

Compute the oblique shock relations given the mach number $M1$ and the deflection surface angle $θ$ .

Performance
Fixed

Arguments

G - REAL: ENTRY: Specific heat constant $γ$ .
M - REAL: ENTRY: Mach number $M ≥1 1$ .
T - REAL: ENTRY: Deflection surface angle $0< θ< 90$ .
STRONG - BOOLEAN: ENTRY: Whether this is a strong shock.
RESULT - ARRAY OF REAL: EXIT: Array with result properties as described in 9.
IERR - INTEGER: EXIT: (optional) Return status code.

Status codes