Method code for $math.rectangular_cylindrical()

[Turn on line numbering]

---

arg coords;
var a;

a = atan2(coords[2], coords[1]);
if (a < 0)
    a += pi2;
return [.distance(coords.subrange(1, 2), origin_2d), a, coords[3]];

// $#Edited: 29 Sep 97 02:50 $miro

---

["// Various Contributors, including: Miroslav Silovic, Bruce Mitchner, Nolan, Sean R. Lynch, Technobunny", "// Created 19-Oct-1996 as a part of ColdCore, see: @help Credit"]