I Want More Digits in TraditionalForm
- To: mathgroup at smc.vnet.net
- Subject: [mg14307] I Want More Digits in TraditionalForm
- From: MJE <nospam at gte.net>
- Date: Tue, 13 Oct 1998 01:21:22 -0400
- Organization: None
- References: <199808110856.EAA10627@smc.vnet.net.> <361E5F95.4B1@nowhere.net>
- Sender: owner-wri-mathgroup at wolfram.com
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 doing. 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]]