556 |
|
VSUM(nv.vp, qtL.wp[li], odir, -1.); |
557 |
|
spinvector(nv.vdir, nv.vdir, nv.vup, d); |
558 |
|
} else if (orb) { /* orbit up/down */ |
559 |
< |
fcross(v1, odir, nv.vup); |
560 |
< |
if (normalize(v1) == 0.) |
559 |
> |
if (geodesic(odir, odir, nv.vup, |
560 |
> |
d=MOVDEG*PI/180.*orb, GEOD_RAD) == 0.0) |
561 |
|
return(0); |
562 |
– |
spinvector(odir, odir, v1, d=MOVDEG*PI/180.*orb); |
562 |
|
VSUM(nv.vp, qtL.wp[li], odir, -1.); |
563 |
< |
spinvector(nv.vdir, nv.vdir, v1, d); |
563 |
> |
geodesic(nv.vdir, nv.vdir, nv.vup, d, GEOD_RAD); |
564 |
|
} else if (mov) { /* move forward/backward */ |
565 |
|
d = MOVPCT/100. * mov; |
566 |
|
VSUM(nv.vp, nv.vp, odir, d); |