Quantidades mistas
Quantidades mistas aparecem em vários contextos: dinheiro, tempo, distância, peso, ângulos, etc.
In[1]:=

Quantity[MixedMagnitude[{2, 35, 21.2}],
MixedUnit[{"Hours", "Minutes", "Seconds"}]]
Out[1]=

In[2]:=

UnitConvert[Quantity[75.562, "AngularDegrees"],
MixedUnit[{"AngularDegrees", "ArcMinutes", "ArcSeconds"}]]
Out[2]=

In[3]:=

Quantity[MixedMagnitude[{5, 11}], MixedUnit[{"Feet", "Inches"}]]
Out[3]=

In[4]:=

Quantity[MixedMagnitude[{5, 11}], MixedUnit[{"Feet", "Inches"}]];
% + Quantity[2.5, "Feet"]
Out[4]=

A função SiderealTime retorna uma quantidade mista. Encontre o tempo sideral atual em sua posição atual.
In[5]:=

stime = SiderealTime[]
Out[5]=

Obtenha a posição atual do Sol em coordenadas equatoriais.
In[6]:=

sunpos = SunPosition[CelestialSystem -> "Equatorial"]
Out[6]=

Calcule a posição da Lua no mesmo sistema de coordenadas.
In[7]:=

moonpos = MoonPosition[CelestialSystem -> "Equatorial"]
Out[7]=

Encontre a ascensão reta dos planetas.
In[8]:=

planetpos =
QuantityMagnitude[
DeleteMissing[
EntityValue[EntityClass["Planet", All],
EntityProperty["Planet", "RightAscension"]]],
"HoursOfRightAscension"]
Out[8]=

Combine as várias medidas de posição em uma lista de ascensões retas para cada corpo celeste.
In[9]:=

ascensions = Join[ {0, moonpos[[1, 1]] - sunpos[[1, 1]]}, planetpos];
mostre o input completo da Wolfram Language
Crie uma visualização gráfica da localização dos planetas, do sol e da lua vistos do Pólo Sul.
mostre o input completo da Wolfram Language
Out[11]=
