Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1999
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How to print a determinant in the traditional way

  • To: mathgroup at smc.vnet.net
  • Subject: [mg15957] Re: How to print a determinant in the traditional way
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Wed, 17 Feb 1999 23:34:15 -0500
  • Organization: Universitaet Leipzig
  • References: <7a28v3$1oh@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

how do you prevent that Mathematica expand the Det[] function ?

Here is the solution 

Unprotect[Det]
	
Det /: ToBoxes[Det[a_],f_:TraditionalForm]:=
  RowBox[{"\[LeftBracketingBar]",ToBoxes[a,f],"\[RightBracketingBar]"}]

Protect[Det]


Now you can get the traditional form of Det[] with

HoldForm[Det[{{a,b},{c,d}}]]//TraditionalForm

Hope that helps
  Jens


Chee Lim Cheung wrote:
> 
> Hi Mathematica experts,
> 
> I am trying to get Mathematica to print a determinant of order 2, 3 or
> higher in the traditional manner like |A| with the elements enclosed
> between two vertical bars by the side. Is there a clean way to do this
> using Mathematica?
> 
> Thanks
> Chee


  • Prev by Date: Re: PlotVectorField Package (easy question?)
  • Next by Date: Re: Working in Modules
  • Previous by thread: RE: How to print a determinant in the traditional way
  • Next by thread: Scrolling Jam