IF ( usingZCoords ) THEN
& usingPCoords, usingZCoords, useDynP_inEos_Zc, setCenterDr,
LOGICAL usingZCoords
usingZCoords = .FALSE.
usingZCoords = .TRUE.
CALL WRITE_0D_L( usingZCoords, INDEX_NONE,
useDynP_inEos_Zc = ( fluidIsWater .AND. usingZCoords