MathGroup Archive 1998

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

Search the Archive

I Want More Digits in TraditionalForm

  • To: mathgroup at
  • Subject: [mg14307] I Want More Digits in TraditionalForm
  • From: MJE <nospam at>
  • Date: Tue, 13 Oct 1998 01:21:22 -0400
  • Organization: None
  • References: <> <>
  • Sender: owner-wri-mathgroup at

Question.  How does one get TraditionalForm to print out all numerical
values with many digits, instead of just 5 or 6?

Here are some input cells you can try out to get the feeling of what I'm

The reason to retain many digits is the interrelation between functions,
i.e. c[p] and p[c] are functional inverses, etc.  Chopping digits
arbitrarily destroys these relations.

Thanks group,

Mark Evans
"evans" at "gte" dot "net"


c[p_] := 0.07549146238926269*ArcSinh[0.00007718657554083618*p] p[c_] :=
12955.620753908715*Sinh[13.246531042724007*c] betaOfP[p_] := 
  171617.0324944112*Sqrt[1 + HoldForm[(0.00007718657554083618*p)]^2]
betaOfC[c_]  :=  171617.0324944112*Cosh[13.246531042724007*c]

(* Display functions in TraditionalForm *)
TraditionalForm[HoldForm[p[c]] == p[c]] TraditionalForm[HoldForm[c[p]]
== c[p]] TraditionalForm[HoldForm[\[Beta][p]] == betaOfP[p]]

  • Prev by Date: Re: Series of a Root object
  • Next by Date: Re: How: {{a,b},{1,2,3}} --> {{a,1},{b,2},{a,3}} ?
  • Previous by thread: Math3.0/Win98: SaveSelectionAs->Metafile clips the image?
  • Next by thread: Re: I Want More Digits in TraditionalForm