#VRML V2.0 utf8

EXTERNPROTO MipMap [
    exposedField MFNode    levels
]
[ "urn:ParaGraph:MipMap" 
  "http://www.parallelgraphics.com/vrml/proto/Cortona/extensions.wrl#MipMap" ]

DEF VP Viewpoint {
    position 0 0 5
}

Shape {
    appearance Appearance {
        material Material {
        }
        texture MipMap {
            levels [
                ImageTexture { url "256.jpg" }
                ImageTexture { url "128.jpg" }
                ImageTexture { url "64.jpg" }
                ImageTexture { url "32.jpg" }
                ImageTexture { url "16.jpg" }
            ]
        }
    }

    geometry Box {size 3 3 3
    }
}

DEF Pos PositionInterpolator {
    key    [0 0.05 0.1 0.15 0.2 0.25 0.3  0.35 0.4 0.45 0.5 0.55 0.6 0.65 0.7 0.75 0.8 0.85 0.9 0.95 1]
    keyValue [0 0 5  0 0 7  0 0 10  0 0 15  0 0 20  0 0 30  0 0 40  0 0 50  0 0 60  0 0 65  0 0 70  0 0 65  0 0 60  0 0 50  0 0 40
        0 0 20  0 0 15  0 0 10  0 0 7 0 0 5]
}

DEF TIME TimeSensor {
    cycleInterval 5
    loop TRUE
}

ROUTE TIME.fraction_changed TO Pos.set_fraction
ROUTE Pos.value_changed TO VP.position