7 files changed, 87 insertions, 0 deletions
diff --git a/149/CH5/EX5.14/ex14.sce b/149/CH5/EX5.14/ex14.sce
new file mode 100755
index 000000000..18a9816b8
--- /dev/null
+++ b/149/CH5/EX5.14/ex14.sce
@@ -0,0 +1,12 @@
+clc
+syms x y
+u=asin((x+y)/(x^0.5+y^0.5))
+a=diff(u,x)
+b=diff(u,y)
+c=diff(a,x)
+d=diff(b,y)
+e=diff(b,x)
+x*a+y*b
+(1/2)*tan(u)
+(x^2)*c+2*x*y*e+(y^2)*d
+(-sin(u)*cos(2*u))/(4*(cos(u))^3)
+\ No newline at end of file
diff --git a/149/CH5/EX5.25.1/ex25_1.sce b/149/CH5/EX5.25.1/ex25_1.sce
new file mode 100755
index 000000000..1f1c7558b
--- /dev/null
+++ b/149/CH5/EX5.25.1/ex25_1.sce
@@ -0,0 +1,10 @@
+clc
+syms r l
+x=r*cos(l)
+y=r*sin(l)
+a=diff(x,r)
+b=diff(x,l)
+c=diff(y,r)
+d=diff(y,l)
+A=[a b;c d]
+det(A)
+\ No newline at end of file
diff --git a/149/CH5/EX5.25.2/ex25_2.sce b/149/CH5/EX5.25.2/ex25_2.sce
new file mode 100755
index 000000000..e7d2090f5
--- /dev/null
+++ b/149/CH5/EX5.25.2/ex25_2.sce
@@ -0,0 +1,16 @@
+clc
+syms r l z
+x=r*cos(l)
+y=r*sin(l)
+m=z
+a=diff(x,r)
+b=diff(x,l)
+c=diff(x,z)
+d=diff(y,r)
+e=diff(y,l)
+f=diff(y,z)
+g=diff(m,r)
+h=diff(m,l)
+i=diff(m,z)
+A=[a b c;d e f;g h i]
+det(A)
+\ No newline at end of file
diff --git a/149/CH5/EX5.25.3/ex25_3.sce b/149/CH5/EX5.25.3/ex25_3.sce
new file mode 100755
index 000000000..8925423ff
--- /dev/null
+++ b/149/CH5/EX5.25.3/ex25_3.sce
@@ -0,0 +1,16 @@
+clc
+syms r l m
+x=r*cos(l)*sin(m)
+y=r*sin(l)*sin(m)
+z=r*cos(m)
+a=diff(x,r)
+b=diff(x,m)
+c=diff(x,l)
+d=diff(y,r)
+e=diff(y,m)
+f=diff(y,l)
+g=diff(z,r)
+h=diff(z,m)
+i=diff(z,l)
+A=[a b c;d e f;g h i]
+det(A)
+\ No newline at end of file
diff --git a/149/CH5/EX5.26/ex26.sce b/149/CH5/EX5.26/ex26.sce
new file mode 100755
index 000000000..8c0197371
--- /dev/null
+++ b/149/CH5/EX5.26/ex26.sce
@@ -0,0 +1,16 @@
+clc
+syms x1 x2 x3
+y1=(x2*x3)/x1
+y2=(x3*x1)/x2
+y3=(x1*x2)/x3
+a=diff(y1,x1)
+b=diff(y1,x2)
+c=diff(y1,x3)
+d=diff(y2,x1)
+e=diff(y2,x2)
+f=diff(y2,x3)
+g=diff(y3,x1)
+h=diff(y3,x2)
+i=diff(y3,x3)
+A=[a b c;d e f;g h i]
+det(A)
+\ No newline at end of file
diff --git a/149/CH5/EX5.30/ex30.sce b/149/CH5/EX5.30/ex30.sce
new file mode 100755
index 000000000..638f386d8
--- /dev/null
+++ b/149/CH5/EX5.30/ex30.sce
@@ -0,0 +1,10 @@
+clc
+syms x y 
+u=x*(1-y^2)^0.5+y*(1-x^2)^0.5
+v=asin(x)+asin(y)
+a=diff(u,x)
+b=diff(u,y)
+c=diff(v,x)
+d=diff(v,y)
+A=[a b; c d ]
+det(A)
+\ No newline at end of file
diff --git a/149/CH5/EX5.5/ex5.sce b/149/CH5/EX5.5/ex5.sce
new file mode 100755
index 000000000..b62ea5da8
--- /dev/null
+++ b/149/CH5/EX5.5/ex5.sce
@@ -0,0 +1,7 @@
+clc
+syms x y z
+v=(x^2+y^2+z^2)^(-1/2)
+a=diff(v,x,2)
+b=diff(v,y,2) 
+c=diff(v,z,2)
+a+b+c
+\ No newline at end of file