[LISP]恳求meflying版主斧正小程序

qliweidong

meflying版主 您好

这是一个在平面地理坐标系中求X0 、Y0 坐标的小程序，已知第一个点的坐标和后面若干个点之间的线距和方位角，求后面若干个点的坐标。

△ X=L×COSα ( L 为两点间的线距，α为两点间的方位角。)

△ Y=L×SINα

Xn + △X

Yn + △Y

我编的这个小程序，现在可算对△X、△Y并可正确的输出，就是Xn 和Yn有时对有时错，错的时候比对的时候多，现送上源程序和附图，烦请

meflying版主多多指教。

meflying

源程序看到两个,附图就没看到...


看的不是很明白,Xn和Yn怎么求?


< class=MsoNormal style="MARGIN: 0cm 0cm 0pt">                         Xn + △X<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p>



< class=MsoNormal style="MARGIN: 0cm 0cm 0pt">                         Yn + △Y


< class=MsoNormal style="MARGIN: 0cm 0cm 0pt">这两句什么意思?