Shark: tc=tau_cor(veh,v,vr) - File Exchange

Code covered by the BSD License

Highlights from
Shark

J=rpy2J(rpy) J=rpy2J(rpy); computes generalised Jacobian matrix which
R_eb=rpy2R_eb(rpy) R_eb=rpy2R_eb(rpy), computes the rotation matrix of e-frame wrt b-frame,
[Cl,Cd,xcp]=a2clcdxc(alfa) [Cl,Cd,xcp]=a2clcdxc(alfa) computes hydrodynamic coefficients Cl and Cd
[v1,v2,v3]=vehicle()
a2clcd(alfa) [Cl, Cd] = a2clcd(alfa) computes hydrodynamic coefficients Cl and Cd
demos DEMOS Demo list for Shark.
shark() (the function shark adds the needed folders to the matlab path)
tc=tau_cor(veh,v,vr) tc=tau_cor(veh,v,vr) calculates coriolis forces from
td=tau_damp(veh,vr,de) td=tau_damp(veh,vr,de); calculates damping forces from
tr=tau_rest(veh,p) tr=tau_rest(veh,p); calculates restoring forces from
xdot=vxdot(xu) computes state derivatives as a function of state and input
z=vp(x,y)
contents.m
linattk.m
NLKSF
OPLOOP
xtrlmod
View all files

from Shark by Giampiero Campa
Nonlinear 6DOF Model of an Underwater Vehicle

tc=tau_cor(veh,v,vr)

function tc=tau_cor(veh,v,vr)

% tc=tau_cor(veh,v,vr) calculates coriolis forces from 
% vehicle variables and generalized velocities v and vr


Crb=[ zeros(3,3),           -vp(veh.Mrb(1:3,:)*v);
     -vp(veh.Mrb(1:3,:)*v), -vp(veh.Mrb(4:6,:)*v)];

Ca= [ zeros(3,3),           -vp(veh.Ma(1:3,:)*vr);
     -vp(veh.Ma(1:3,:)*vr), -vp(veh.Ma(4:6,:)*vr)];

tc=Crb*v+Ca*vr;

Highlights from Shark

Highlights from
Shark