Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (** User Mathematica initialization file **)
- Get["drawtriangle`"]
- $PrePrint = If[MatrixQ[#],MatrixForm[#],#]&;
- ---------------------
- (** User Mathematica initialization file **)
- (** Decide how to display graphics on this machine **)
- Begin["System`Private`"]
- (* Hide any symbols which are created *)
- Which[
- $Linked || $ParentLink =!= Null, <<"FrontEndGraphics.m",
- True, <<"NoGraphics.m"
- ]
- End[]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement