NAME

NameOfPlanet

Get the name of the planet from its number.

USAGE

NameOfPlanet nplanet

PARAMETERS

nplanet: is the number of the planet.

OPTIONS

None

RETURN

Return a string being the full name of the planet

EXAMPLE

foreach {i} {0 1 2 3 4 5 6 7 8 9 10 11 12 13 14} {

PutTxt [NameOfPlanet $i]

}

Output

Sun
Moon
Mercury
Venus
Mars
Jupiter
Saturn
As
M.H.
Rahu
Kethu
Uranus
Neptune
Pluto
Fortune