(*$TextStyle = {FontFamily->"Helvetica", FontSize -> 18, FontWeight -> "Bold", FontColor->RGBColor[0,0,0.5]}*)
$TextStyle = {FontFamily->"Helvetica", FontSize -> 18, FontWeight -> "Bold", FontColor->RGBColor[0,0,0.5],Background->None}
(*WCCAxesStyle = AxesStyle->{RGBColor[1.0,0.5,0.5],Thickness[0.01]}*)
WCCAxesStyle = AxesStyle->{Thickness[0.01]}
WCCplotStyle = PlotStyle->{{Thickness[0.0075],PointSize[0.01]}}
SetOptions[Plot,WCCplotStyle,WCCAxesStyle]
SetOptions[ListPlot,WCCplotStyle,WCCAxesStyle]
SetOptions[ParametricPlot,WCCplotStyle,WCCAxesStyle]
SetOptions[ContourPlot,WCCAxesStyle]
SetOptions[DensityPlot,WCCAxesStyle]
SetOptions[Plot3D,WCCAxesStyle]
SetOptions[ParametricPlot3D,WCCAxesStyle]
