PROTO Tree [
  exposedField SFVec3f translation      0 0 0
  exposedField SFInt32 size             1
  exposedField SFNode  woodtexture      NULL
  exposedField 
SFNode  leavetexture     NULL
]
{
  Transform {
    translation IS translation
    children [
      Transform {
        translation 0 1.8 0
        children 
[
          Shape {
            appearance Appearance {
              material Material {diffuseColor 0 .6 0}
              texture IS leavetexture
            }
            geometry Sphere {
              radius 
1
            }
          }
        ]
      }
      Shape {
        appearance Appearance {
          material Material {diffuseColor .6 .3 0}
          texture IS woodtexture
        }
        geometry Cylinder 
{
          radius .2
          height 2
          top    FALSE
          bottom FALSE
        }
      }
    ]
  }
}