//¤@­Óclip½d¨Ò

//==========================================================

//      base surface



surface {

        diff dark_plum          // dark plum

}

ring { center 0 0 0 normal 0 0 1 radius 1000 }



//      outside surface



surf {

        diff 0 .5 1

        shine 20 white

}

cone { apex 0 0 2 apex_radius 0

       base 0 0 0 base_radius 1

        clip { apex  .5 -2 1

               base  .5  2 1

               radius .5

               outside }

}



//      inside surface



surf {

        diff red

        shine 20 white

}







cone { apex  .5 -2 1

       base  .5  2 1

       radius .5

        clip {    apex 0 0 2 apex_radius 0

                  base 0 0 0 base_radius 1

               inside }

}

//==========================================================