Prototypes

#VRML V2.0 utf8

PROTO MyCyl [
	     field SFColor color 1 1 1
	     field SFVec3f position 0 0 0
	     field SFFloat height 1
	     field SFFloat radius 1
	    ]
{		  
   Transform {
      translation IS position
      children [
	 Shape {
	    appearance Appearance {
	       material Material {
		  diffuseColor IS color
	       }
	    }
	    geometry Cylinder { 
	       height IS height
	       radius IS radius
	    }
	 }
	]
   }
}

MyCyl {
   position -6 0 0
   color 1 0 0
   height .5
   radius .25
}

MyCyl {
   position -2 0 0
   color 0 1 0
   height .5
   radius 2
}

MyCyl {
   position 2 0 0
   color 0 0 1
   height 1
   radius 1
}

MyCyl {
   position 6 0 0
   color 1 1 0
   height 1.5
   radius .5
}

NavigationInfo { type "EXAMINE" }
Viewpoint { position 0 0 10 }
Background { skyColor 1 1 1 }