& fluidIsAir, fluidIsWater,
LOGICAL fluidIsAir
IF ( fluidIsAir ) THEN
IF (fluidIsAir) conv_th2Heat =
IF (fluidIsAir) vT_Heat = vT_Heat
CALL WRITE_0D_L( fluidIsAir, INDEX_NONE,
fluidIsAir = .FALSE.
fluidIsAir = .TRUE.
IF ( fluidIsAir ) tracerDefault = 300.
IF ( fluidIsAir ) tracerDefault = 0.