summaryrefslogtreecommitdiff
path: root/548/CH6/EX6.16.c/6_16c.sce
blob: 27c7c91c58e107a8565db8005b8c1b9cebcd3743 (plain)
1
2
3
4
5
6
7
pathname=get_absolute_file_path('6_16c.sce')
filename=pathname+filesep()+'6_16c_data.sci'
exec(filename)
A=2*Tf/W;B=W/S;C=1/L_Dmax^2;E=sqrt(A^2-C)
Vmax=sqrt((A*B+B*E)/(D*Cdo))
printf("\Answer:\n")
printf("\n\Maximum Velocity for CJ-1: %f m/s\n\n",Vmax)