disturb.m

来自「大气层内航天器飞行动力学matlab仿真模型」· M 代码 · 共 8 行

function a=disturb(mu3,R,R3)
% Copyright Ashish Tewari (c) 2006
r=norm(R);
r3=norm(R3);
R23=R-R3;
r23=norm(R23);
fx=(r23/r3)^3-1;
a=-mu3*(R+fx*R3)/r23^3;