arfrav - Rayleigh relations given V /V*

SUBROUTINE AR07AE(G,V,RESULT,IERR)
  DOUBLE PRECISION G, V, RESULT(8)
  INTEGER IERR

Compute the rayleigh relations given the velocity ratio, $V/V*$ .

Performance
Fixed

Arguments

G - REAL: ENTRY: Specific heat constant $γ$ .
V - REAL: ENTRY: Velocity ratio $0< V /V* <(γ+ 1)/γ$ .
RESULT - ARRAY OF REAL: EXIT: Array with result properties as described in 5.
IERR - INTEGER: EXIT: (optional) Return status code.

Status codes