$(
Rotation/MeasuredAngle ($Object, $Center, $AngleMeasure)
${
This function is present in GSP but missing in JSP.
Rotates an object at an angle specified by a measurement.
Angle orientation is in the mathematical sense
(as in the Rotation construction and Angle measurement), not negative
(as in the three Translation/...Angle/...Distance constructions).
The MeasureInDegrees and DirectedAngles parameters affect the result.
$}
Translation ($Center, 10, 0) [hidden];
Translation/MarkedAngle/FixedDistance ($Center, $AngleMeasure, 10) [hidden];
Rotation/MarkedAngle ($Object, $Center, $1, $Center, $2);
$)
$(
Rotation/MeasuredAngle/Negative ($Object, $Center, $AngleMeasure)
${
This function is present in GSP but missing in JSP.
Rotates an object at an angle specified by a measurement.
Angle orientation is in the negative mathematical sense
(as in the three Translation/...Angle/...Distance constructions),
not positive (as in the Rotation construction and Angle measurement).
The MeasureInDegrees and DirectedAngles parameters affect the result.
$}
Translation ($Center, 10, 0) [hidden];
Translation/MarkedAngle/FixedDistance ($Center, $AngleMeasure, 10) [hidden];
Rotation/MarkedAngle ($Object, $Center, $2, $Center, $1);
$)
${
Just testing.
* Background = 239, 239, 239
* MeasureInDegrees = 1
* LabelSize = 8
$V Point (50, 60);
$S1 UnitPoint ($V, 25);
$c Circle ($V, $S1) [black];
Circle interior ($c) [color (223, 223, 223)];
$S2 Point on Object ($c, -1.0); { this has negative orientation too. }
Segment ($V, $S1) [black];
Segment ($V, $S2) [black];
$alpha Angle ($S1, $V, $S2, 10, 15, 'alpha: ') [suffix (' degrees')];
$d Distance ($V, $S1, 10, 27, 'd: ') [suffix (' pixels')];
$C Point (50, 150) [label ('C')];
$P Point (85, 150) [label ('P')];
Rotation/MeasuredAngle ($P, $C, $alpha) [blue, label ('P rotated by alpha around C')];
$P1 Translation/MarkedAngle/MarkedDistance ($C, $alpha, $d) [blue, label ('C translated by (d, -alpha)')];
Circle ($C, $P1) [hidden];
Circle interior ($1) [color (215, 215, 239)];
Circle ($C, $P) [hidden];
Circle interior ($1) [color (223, 223, 239)];
$}