Method code for $math.rotation_mat_2d()

[Turn on line numbering]

---

arg angle;
var s, c;

s = sin(angle);
c = cos(angle);
return [[c, s, 0.0], [-s, c, 0.0], [0.0, 0.0, 1.0]];

---

// Miroslav Silovic
// Created 19-Oct-1996 as a part of ColdCore, see: @help Credit