Difference between revisions of "Angle16Deg"

From Lazarus wiki
Jump to navigationJump to search
m (Fixed syntax highlighting)
 
(4 intermediate revisions by 2 users not shown)
Line 1: Line 1:
 +
 +
{{Angle16Deg}}
 +
 
The one angle16deg is 1/16th of a degree.  
 
The one angle16deg is 1/16th of a degree.  
 
For example, a full circle equals 5760 (= 16*360).
 
For example, a full circle equals 5760 (= 16*360).
Line 6: Line 9:
 
Convert Angle16Deg to [[Radian|radian]]
 
Convert Angle16Deg to [[Radian|radian]]
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
  
 
function Angle16DegToRad(const a_angle16deg:integer):double;
 
function Angle16DegToRad(const a_angle16deg:integer):double;
Line 19: Line 22:
 
Convert radian to Angle16Deg
 
Convert radian to Angle16Deg
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
  
 
function RadtoAngle16Deg(const a_radian:double):integer;
 
function RadtoAngle16Deg(const a_radian:double):integer;
Line 32: Line 35:
 
* [[doc:lcl/graphics/tcanvas.chord.html|Chord]]
 
* [[doc:lcl/graphics/tcanvas.chord.html|Chord]]
  
 
+
[[Category:Mathematics]]
[[Category:Code Snippets]]
 

Latest revision as of 08:25, 9 February 2020

English (en) français (fr)

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

function Angle16DegToRad

Convert Angle16Deg to radian

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

function RadtoAngle16Deg

Convert radian to Angle16Deg

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

See also