4 calls to
DIAGNOSTICS
PHYS_ADIABATIC
PHYS_IDEALIZED
PHYSPKG
TPHYSBC