Rot ( p ; phi )

Rotate point p by phi counterclockwise round the origin

Average rating: 4.2 (28 votes) Log in to vote

Christoph Ivo Mattle - Show more from this author
Christophs
http://www.christophmattle.ch

Sample input:

//3 samples
"10|0" ; 56
"0|-2" ; 120
"-400|0"; 200

Sample output:

/
"5.5919|8.2904"
"1.7321|1"
"375.877|136.8081"

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

// Rotate p by phi counterclockwise round the origin
// ------------------------------------------
SetzeVars ( 
[ pos = Position ( p ; "|" ; 1 ; 1 ) ;
  x = ZeichenLinks ( p ; pos - 1 ) ;
  y = ZeichenRechts ( p ; Länge ( p ) - pos ) ;
  arc = phi * Pi / 180 ;
  sn = Sin ( arc ) ;
  cs = Cos ( arc ) ] ;
  Runden ( cs * x - sn * y ; 4 ) & "|" & Runden ( sn * x + cs * y ; 4 )
)

Rotate point p by phi counterclockwise round the origin.
p is (x y)'. "|" separates the values.
phi is the angle in degrees.
The result is (x1 y1)' likewise with "|".

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

Rot ( p ; phi )

Comments

Support this website.

Support this website.