1 files changed, 7 insertions, 0 deletions
diff --git a/548/CH6/EX6.16.c/6_16c.sce b/548/CH6/EX6.16.c/6_16c.sce
new file mode 100755
index 000000000..27c7c91c5
--- /dev/null
+++ b/548/CH6/EX6.16.c/6_16c.sce
@@ -0,0 +1,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)
+\ No newline at end of file