eb05416991
Taken from sources in CVS at:
https://sourceforge.net/projects/rocketworkbench/
Sources extracted in two steps:
1. Pull entire project tree into a subdir "rwb" via "rsync":
rsync -a a.cvs.sourceforge.net::cvsroot/rocketworkbench/ rwb/.
2. Export sources:
export CVSROOT=$(pwd)/rwb
SUBDIRS="analyser cpropep cpropep-web CVSROOT data libcompat libcpropep libnum libsimulation libthermo prop rocketworkbench rockflight"
mkdir rwbx; cd rwbx
cvs export -D now ${SUBDIRS}
After this (and some backups for safety), the directory content was
added to a Git repo:
git init .
git add *
17 lines
421 B
Matlab
17 lines
421 B
Matlab
function dy = flight_vacuum(y, t)
|
|
|
|
G = 6.672e-11;
|
|
M = 5.98e24;
|
|
W = 7.27e-5;
|
|
|
|
dy(1) = y(4);
|
|
dy(2) = y(5);
|
|
dy(3) = y(6);
|
|
|
|
dy(4) = -(G*M)/(y(1)^2) + y(1)*(y(5)^2) + ((W + y(6))^2)*y(1)*(cos(y(2))^2);
|
|
dy(5) = (-1/y(1))*( y(1)*cos(y(2))*sin(y(2))*(W+y(6))^2 + 2*y(4)*y(5));
|
|
dy(6) = (-1/(y(1)*cos(y(2))))*(2*(W*(y(4)-y(1)*y(5))+y(4)*y(6))*cos(y(2)) -
|
|
2*y(1)*y(6)*y(5)*sin(y(2)));
|
|
|
|
endfunction
|