initial commit / add all books

1 files changed, 21 insertions, 0 deletions

diff --git a/564/CH26/EX26.4/26_4.sce b/564/CH26/EX26.4/26_4.sce
new file mode 100755
index 000000000..e0a298ead
--- /dev/null
+++ b/564/CH26/EX26.4/26_4.sce
@@ -0,0 +1,21 @@
+pathname=get_absolute_file_path('26_4.sce')

+filename=pathname+filesep()+'26_4data.sci'

+exec(filename)

+B=((a*t2)/6)+((b*t1)/18)*3;

+A=((b*t1)/18)*6;

+L1=Load/4;

+x=L1/a;

+d=b/3;

+E=1,G=GE;

+mu=(((G*t1)/(d*E))*((A+B)/(A*B)))^0.5;

+D=(-x*A)/((A+B)*mu*cosh(L*0.5*mu));

+function[Sb]=f(z)

+     Sb=((D/B)*sinh(mu*z)) -(x/(A+B))*z;

+endfunction

+funcprot()

+z=linspace(0,L,10*L);

+Sb=feval(z,f);

+plot2d(z,Sb);

+xgrid(3),xtitle('σB versus z','z','σB');

+datatipToggle()

+printf("\nclick on the point to view its coordinate on the plot");
\ No newline at end of file