RosettaCodeData/Task/Averages-Mean-angle/D/averages-mean-angle.d
2023-07-01 13:44:08 -04:00

16 lines
554 B
D

import std.stdio, std.algorithm, std.complex;
import std.math: PI;
auto radians(T)(in T d) pure nothrow @nogc { return d * PI / 180; }
auto degrees(T)(in T r) pure nothrow @nogc { return r * 180 / PI; }
real meanAngle(T)(in T[] D) pure nothrow @nogc {
immutable t = reduce!((a, d) => a + d.radians.expi)(0.complex, D);
return (t / D.length).arg.degrees;
}
void main() {
foreach (angles; [[350, 10], [90, 180, 270, 360], [10, 20, 30]])
writefln("The mean angle of %s is: %.2f degrees",
angles, angles.meanAngle);
}