1 files changed, 14 insertions, 0 deletions
diff --git a/1367/CH2/EX2.6/2_6.sce b/1367/CH2/EX2.6/2_6.sce
new file mode 100755
index 000000000..1dff65f9b
--- /dev/null
+++ b/1367/CH2/EX2.6/2_6.sce
@@ -0,0 +1,14 @@
+//Find dimensionsof elliptical locus
+//Ex:2.6
+clc;
+clear;
+close;
+n=4;//fourth orbit
+a=(0+1)/n;//for s suborbit
+disp(a,"For s suborbit b/a = ");
+b=(1+1)/n;//for p suborbit
+disp(b,"For p suborbit b/a = ");
+c=(2+1)/n;//for d suborbit
+disp(c,"For d suborbit b/a = ");
+d=(3+1)/n;//for f suborbit
+disp(d,"For f suborbit b/a = ");
+\ No newline at end of file