Compressible Flow Subroutine Library
Programming Reference Manual
Version 1.0 DD-00008-110E

3.20.2 arsmnvp - Dynamic moving shock relations given p2/p1
SUBROUTINE AR19AA(G,A0,P,RESULT,IERR)
  DOUBLE PRECISION G, A0, P, RESULT(3)
  INTEGER IERR

Compute the dynamic moving normal shock wave relations given the the pressure ratio p2/p1   and the speed of sound a0   of the medium.

Performance
Fixed

Arguments

G - REAL

ENTRY: Specific heat constant γ .

A0 - REAL

ENTRY: Speed of sound in the medium a0> 0  .

P - REAL

ENTRY: Pressure ratio p2/p1 >(γ-1)/(γ +1)  .

RESULT - ARRAY OF REAL

EXIT: Array with result properties as described in  17.

IERR - INTEGER

EXIT: (optional) Return status code.

Status codes

-1

Specific heat ratio γ≤ 1  .

-2

Given a0   out of range.

-3

Given p2/p1   out of range.