type InputChoiceIncompressible = enumeration(ph "(p,h) as inputs", pT "(p,T) as inputs", phX "(p,h,X) as inputs", pTX "(p,T,X) as inputs");