Computer program for quasi-one-dimensional compressible flow with area change and friction - Application to gas film seals

A computer program is presented for compressible fluid flow with friction and area change. The program carries out a quasi-one-dimensional flow analysis which is valid for laminar and turbulent flows under both subsonic and choked flow conditions. The program was written to be applied to gas film seals. The area-change analysis should prove useful for choked flow conditions with small mean thickness, as well as for face seals where radial area change is significant. The program is written in FORTRAN 4.