arsolws - Oblique shock relations given θ and δ

SUBROUTINE AR11AF(G,D,T,RESULT,IERR)
  DOUBLE PRECISION G, D, T, RESULT(10)
  INTEGER IERR

Compute the oblique shock relations given the deflection surface angle $θ$ and the wave angle $δ$ .

Performance
Iterative

Arguments

G - REAL: ENTRY: Specific heat constant $γ$ .
D - REAL: ENTRY: Wave angle $0< δ<90$ .
T - REAL: ENTRY: Deflection surface angle $0< θ< 90$ .
RESULT - ARRAY OF REAL: EXIT: Array with result properties as described in 9.
IERR - INTEGER: EXIT: (optional) Return status code.

Status codes