(15C) Digital Root, Modulus, and 2D Coordinate Rotation

[Thomas Klemm]

(01-08-2016 03:24 AM)Eddie W. Shore Wrote:  HP 15C: 2D Coordinate Rotation

The same using complex numbers:

Code:

001 - 42,21,13  LBL C
002 -    45  4  RCL 4
003 -    45  5  RCL 5
004 -    42 25  I
005 -        1  1
006 -    45  3  RCL 3
007 -    42 25  I
008 -    42  1  ->R
009 -       20  x
010 -    44  6  STO 6
011 -    42 30  Re<>Im
012 -    44  7  STO 7
013 -    43 32  RTN

Cheers
Thomas