summaryrefslogtreecommitdiff
path: root/2409/CH2/EX2.15/Ex2_15.sce
blob: fb68a7e94fd5be5e6093438f1c23af44fddda0fd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13

//Variable Declaration

v=204.81   //True anomaly(degrees) from Example 2.14
r=7257     //Magnitude of radius vector(km) from Example 2.14

//Calculation

rP=r*cos(v*%pi/180)  //P coordinate of radius vector(km)
rQ=r*sin(v*%pi/180)  //Q coordinate of radius vector(km)

//Result
printf("r in the perifocal coordinate system is %.2f Pkm %.2f Qkm",rP,rQ)