Set up defaults

Turn off annoying warning messages
Set default options for specific functions


Converted by Mathematica      February 3, 2003