Shape {
    appearance Appearance {
        material DEF Monolith1Facade Material {
            diffuseColor 0.2 0.2 0.2
        }
    }
    geometry Box { size 2.0 4.0 0.3 }
}
DEF Monolith1Timer TimeSensor {
    cycleInterval 4.0
    loop FALSE
    startTime 0.0
    stopTime  0.1
}

ROUTE Monolith1Touch.touchTime
   TO Monolith1Timer.set_startTime
ROUTE Monolith1Timer.fraction_changed
   TO Monolith1Facade.set_transparency