Sign in Join
Wiki copytemporary

Revision 1 of 1, by GAN on 2-9-2020. The page as it is now.

Angle16Deg

The one angle16deg is 1/16th of a degree. For example, a full circle equals 5760 (= 16*360).

function Angle16DegToRad

Convert Angle16Deg to radian

pascal

function Angle16DegToRad(const a_angle16deg:integer):double;
begin
  result := a_angle16deg * Pi / ( 180 * 16 );
end;

function RadtoAngle16Deg

Convert radian to Angle16Deg

pascal

function RadtoAngle16Deg(const a_radian:double):integer;
begin
  result := round ( a_radian * 180 * 16 / Pi );
end;

See also


From the Free Pascal wiki, page "Angle16Deg", as it stood on 2020-02-09 after a change by GAN, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.