blob: 1dff65f9bfe438e2bd15e5609181eb4542cd2234 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
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 = ");
|
