sub RadToDegree($argument)
   {
   return (($argument * 180)/ Math::Trig->pi());    
   }