Hola,
I am still playing with the 15c examples and this time it is from the advanced functions handbook, page 78, calculating the nth roots of a complex number. I tried my best to translate the program, so here is my WP34s version:
001 LBL A
002 [cmplx]x[<->]y
003 [cmplx]1/x
004 [cmplx]RCL L
005 [cmplx]R[v]
006 [cmplx]y[^x]
007 [cmplx]STO 02
008 0
009 ENTER[^]
010 3
011 6
012 0
013 [cmplx]R[^]
014 [cmplx]/
015 [cmplx]STO 04
016 0
017 STO K
018 LBL 00
019 [cmplx]RCL 04
020 RCL[times] K
021 1
022 DEG
023 [->]REC
024 [cmplx]RCL[times] 02
025 1
026 STO+ K
027 R[v]
028 STOP
029 GTO 00
to run it, I first set the ssize8, then 0 FILL and then follow the example in the book, using 1^1/100 as the value. Here are the results:
k = 0, z0 = 1 (check!)
k = 1, z1 = 0.9980+0.0628i (check!)
k = 50, z50 = -1+(1.2815^-38)i (check? 15C result is -1)
So, is this because the different precision between both machines and this is the good result? ... or am I that bad as a programer :-)
Saludos,
Miguel
Edited: 1 Sept 2011, 8:41 p.m.