& usePW79thermodynamics,
IF ( usePW79thermodynamics ) THEN
usePW79thermodynamics = .TRUE.
usePW79thermodynamics = .FALSE.
& usePW79thermodynamics, useMaykutSatVapPoly,
CALL WRITE_0D_L ( usePW79thermodynamics, INDEX_NONE,
IF (.NOT.usePW79thermodynamics) THEN