object{
  OBJECT_IDENTIFIER | OBJECT {}
  LIST_Outside, LIST_Inside
  }

// object for object pattern
#declare Pattern_Object_1=
union{
  object{
   Round_Box(<-10,-.5,-3>,<0,1.3,-.5>,.4,0)}
  object{
   Round_Box(<-10,-.5,.5>,<0,1.3,3.0>,.4,0)}
} // end of union
//-------------------------------------------
#declare Object_Pigment_1 =
pigment{
  object{
      Pattern_Object_1
      color rgb<1,0.65,0.2> // outside
      color rgb<0.6,0.00,0>  // inside
    }// object
} // end pigment
//-------------------------------------------
#declare Body_Texture =
   texture{ pigment{ Object_Pigment_1 }
            finish { phong 1 }
          } // end of texture
//-------------------------------------------
#declare D = 0.00001;
#declare W = 0.75;// width
#declare Sz = 3; // z scale
#declare H  = 3; // height
union{ // Body
  object{ Round_Box(<-3,0,-W>,<0,H,W>,W-D,0)
          matrix<1, 0, 0, // shear_y_to_x
                 -0.5, 1, 0,
                    0, 0, 1,
                    0, 0, 0>} //
  object{ Round_Box(<-5,0,-W>,<0,H,W>,W-D,0)
          translate<-2,0,0>} //
  scale<1,1,Sz>
  texture{ Body_Texture }
} //-----------------------------------------

//-------------------------------------------
#declare Body_Texture_1 =
   texture{ pigment{ Object_Pigment_1 }
            finish { phong 1 }
          }
//-------------------------------------------
// another object for an object pattern
#declare Pattern_Object_2=
  box{<-10,2.25,-3>,<0,3,3>}
//-------------------------------------------
#declare Object_Pigment_2 =
pigment{
   object {
    Pattern_Object_2
    color rgbf<1,1,1,1> // outside
    color rgb<1,1,1>*0.05// inside
   }// object
  } // end pigment
//-------------------------------------------
#declare Body_Texture_2 =
   texture{ pigment{ Object_Pigment_2 }
            finish { phong 1 }
          }
//-------------------------------------------
// layered texture:
#declare Body_Texture =
 texture{ Body_Texture_1 }
 texture{ Body_Texture_2 }
//-------------------------------------------

//-------------------------------------------
#declare Object_Normal_1 =
normal{
   object {
    Pattern_Object_1
    normal{ agate 2 scale 0.15  } // outside
    normal{ bumps 0.35 scale 0.15} // inside
   }// object
  } // end normal
//-------------------------------------------
//-------------------------------------------
#declare Body_Texture =
   texture{ pigment{ Object_Pigment_1 }
            normal { Object_Normal_1 }
            finish { phong 1 }
          }
//-------------------------------------------