MathGroup Archive 1999

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

Search the Archive

Angular format

  • To: mathgroup at
  • Subject: [mg20872] Angular format
  • From: "Alan W.Hopper" <awhopper at>
  • Date: Thu, 18 Nov 1999 01:09:48 -0500 (EST)
  • Sender: owner-wri-mathgroup at

I have an output angle in decimal degrees; a = 174.87625,

now with ,

In[1] := dms[n_]:=Module[{d,m,s,a},
In[2] := dms[174.87625]

Out[3] = {174, 52, 34.5}

The output is converted to degree, arcminute, arcsecond (list)form
but I want a fully symbolic result using the single and double quotes
if possible, for arcminute and arcsecond symbols,
or alternatively like this ,

174\[Degree] 52\[CloseCurlyQuote] 34\[CloseCurlyDoubleQuote].5

as the standard double quotes are 'protected' by Mathematica.

I have tried using strings,

"174\[Degree]" <> "52\[CloseCurlyQuote]" <> 

and this works O.K, but I can not seem to get everything together 
into a workable program, so far.

Does anyone have some suggestions (using Mathematica 3) ?

Alan W. Hopper
awhopper at 

  • Prev by Date: Re: Goto[tag] has a strange behaviour
  • Next by Date: Re: Q: smooth 3Dplot with big mesh
  • Previous by thread: Progressive graphics output
  • Next by thread: Re: Angular format