summaryrefslogtreecommitdiff
path: root/797/CH1/EX1.5s/1_05_solution.sce
diff options
context:
space:
mode:
Diffstat (limited to '797/CH1/EX1.5s/1_05_solution.sce')
-rw-r--r--797/CH1/EX1.5s/1_05_solution.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/797/CH1/EX1.5s/1_05_solution.sce b/797/CH1/EX1.5s/1_05_solution.sce
new file mode 100644
index 000000000..e7952338e
--- /dev/null
+++ b/797/CH1/EX1.5s/1_05_solution.sce
@@ -0,0 +1,15 @@
+//Solution 1-5
+WD=get_absolute_file_path('1_05_solution.sce');
+datafile=WD+filesep()+'1_05_example.sci';
+clc;
+exec(datafile)
+function [Z] =equations(X)
+ x = X(1);
+ y = X(2);
+ Z(1) = x - y - difference;
+ Z(2) = x**2 + y**2 - x -y - sum_squares_minus_sum;
+endfunction
+
+[X, v, info] = fsolve([1,1], equations);
+printf("x = %f\n", X(1));
+printf("y = %f\n", X(2)); \ No newline at end of file