diff options
Diffstat (limited to '50/DEPENDENCIES/Vaitken.sce')
| -rwxr-xr-x | 50/DEPENDENCIES/Vaitken.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/50/DEPENDENCIES/Vaitken.sce b/50/DEPENDENCIES/Vaitken.sce new file mode 100755 index 000000000..cf93e1b3a --- /dev/null +++ b/50/DEPENDENCIES/Vaitken.sce @@ -0,0 +1,9 @@ +// this program is exclusively coded to perform one iteration of aitken method, + +function x0aa=aitken(x0,x1,x2,g) +x0a=x0-(x1-x0)^2/(x2-2*x1+x0); +x1a=g(x0a); +x2a=g(x1a); +x0aa=x0a-(x1a-x0a)^2/(x2a-2*x1a+x0a); + +endfunction |