|
|
1。算坐标原程序
1 2 3 4
(0,0) D @
1 3 4
x=0+Dcos@
2 3 4
y=0+Dsin@
2。计算距离和方位原程序
1 2 3 4
(1,1) (0,0)
(1-3)shift[R_P](2-4)=
shift+RUN
shift[X_Y]
3。通过半径R，I角计算切线长(T)和外矢距(E)
INPUT:R,I OUTPUT:T,E
1 2 假设R=1,I=90度
R I
1 2
T=R*Tg(I/2)
1 2
E=R{SEC(I/2)-1}
because SEC@=1/COS@
1 2
SO E=R*{1/COS(I/2)-1}
4。通过半径R和切线长T计算I角
1 2
INPUT:R,T OUTPUT:I
I=2arctg(T/R) |
|
置顶卡
