using Laitone pressure approximation using Laitone pressure approximationDOUBLE PRECISION FUNCTION AR04AD(G,CP0,IERR) DOUBLE PRECISION G, CP0 INTEGER IERR
Compute critical mach number given 
Laitone pressure approximation.
| Argument | Intent | Description |
| g | in | Specific heat constant |
| cp0 | in | Critical pressure coefficent |
| ierr | out | (optional) Return status code |
Specific heat ratio 
.
Iterative solver failed.
Return Value
Critical mach number 
or NAN on error.
. 
.