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

3.20.4 arsmnvup - Dynamic moving shock relations given Up
SUBROUTINE AR19AC(G,A0,UP,RESULT,IERR)
  DOUBLE PRECISION G, A0, UP, RESULT(3)
  INTEGER IERR

Compute the dynamic moving normal shock wave relations given the mass-motion velocity Up 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 a > 0
 0  .

UP - REAL

ENTRY: Max-motion velocity U  >-(2⎷2a √︁ γ(γ2+2γ--1))/(γ +1)
 p         0  .

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

Computed p2/p1   out of range.

-4

Given Up out of range.