  type color    { single r,g,b,a}
  type vector   { single x,y,z }
  '
  type material {
    color diffuse,anbient,specular
    single shininess
  }
  type physical {
    vector pos,siz,rot,vel,spin
    single dens
  }

  class body
  '
  has material mat
  has physical phys
  method mass() as single {return this.phys.dens  * phys.siz.x * phys.siz.y * phys.siz.z}
  method constructor (single x,y,z,d) { phys.siz={x,y,z} : phys.dens=d }
  method destructor () {}
  '
  end class

  '#recordof physical
  '#recordof material
  '#recordof body

  'TEST


  new body rock (3,4,5,2)

  print "Mass of rock is " rock.mass

  del rock


