(* $Id: init.m,v 1.8.2.2 2003/01/29 12:32:33 hennig Exp $ *)

(* {{{ Mathematica meta tags *)

(* :Title: AnalogInsydes/RF/init.m *)

(* :Authors: Dr.-Ing. Eckhard Hennig, eckhard@kaninkolo.de *)

(* :Summary: Initialization file for context AnalogInsydes`RF`. *)

(* :Context: AnalogInsydes`RF` *)

(* :Package Version: $Revision: 1.8.2.2 $ *)

(* :Mathematica Version: > 3.0 *)

(* :Copyright: Copyright (C) 2001-2003 by Eckhard Hennig

  This program is free software; you can redistribute it and/or
  modify it under the terms of the GNU General Public License
  as published by the Free Software Foundation; either version 2
  of the License, or (at your option) any later version.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*)

(* :History:
 * $Log: init.m,v $
 * Revision 1.8.2.2  2003/01/29 12:32:33  hennig
 * + Header edited.
 *
 * Revision 1.8.2.1  2003/01/29 11:54:56  hennig
 * + GPL.
 *
 *)

(* :Keywords: *)

(* :Source: *)

(* :Warning: *)

(* :Limitation: *)

(* :Discussion: *)

(* }}} *)

(* {{{ Version check *)

(**********************************************************************)
(* Check if we are running under Mathematica 3.0 or higher            *)
(**********************************************************************)

If[ $VersionNumber < 3.0,
  Print["This program requires Mathematica Version 3.0 or higher."];
  Abort[]
];

(* }}} *)

(* {{{ VersionID *)

(******************************************************************************)
(* Version                                                                    *)
(******************************************************************************)

AnalogInsydes`RF`Private`$VersionId = "$Id: init.m,v 1.8.2.2 2003/01/29 12:32:33 hennig Exp $"

(* }}} *)

DeclarePackage[ "AnalogInsydes`RF`RFGraphics`", 
  { "SmithChart", "ChartStyle", "GridResolution", "MajorGridStyle",
    "MinorGridStyle", "LabelOffset", "LabelStretchFactor", "High", "Low",
    "Medium", "DataConversion", "Decorations", "LabelPosition",
    "LabelText", "PointColor", "AdmittancePoint", "ImpedancePoint",
    "ConductanceCircle", "ResistanceCircle", "VSWRCircle" } ];

DeclarePackage[ "AnalogInsydes`RF`RFSimulationData`",
  { "ReadTouchstone" } ];

Get["AnalogInsydes`RF`RFCommon`"]

(*! Local Variables *)
(* local Variables: *)
(* fill-column: 79 *)
(* comment-column: 20 *)
(* End: *)
