summaryrefslogtreecommitdiff
path: root/548/CH4/EX4.27/4_27.sce
blob: 60f8a7e8c97ed84c37c462d6b2bf79ba7133ed93 (plain)
1
2
3
4
5
6
pathname=get_absolute_file_path('4_27.sce')
filename=pathname+filesep()+'4_27data.sci'
exec(filename)
Tw=q*Cf;disp(Tw,"Tw=","Tw=q*Cf","shear stress at point 0.6096 m Tw:");
printf("\Answer:\n")
printf("\n\shear stress at a point 0.6096m downstream of the leading edge: %f m\n\n",Tw)