summaryrefslogtreecommitdiff
path: root/683/CH10
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /683/CH10
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '683/CH10')
-rwxr-xr-x683/CH10/EX10.1/PPJ_1.sce16
-rwxr-xr-x683/CH10/EX10.2/PPJ_2.sce37
-rwxr-xr-x683/CH10/EX10.3/PPJ_3.sce38
-rwxr-xr-x683/CH10/EX10.4/PPJ_4.sce32
4 files changed, 123 insertions, 0 deletions
diff --git a/683/CH10/EX10.1/PPJ_1.sce b/683/CH10/EX10.1/PPJ_1.sce
new file mode 100755
index 000000000..946ab3b43
--- /dev/null
+++ b/683/CH10/EX10.1/PPJ_1.sce
@@ -0,0 +1,16 @@
+// sum 10-1
+clc;
+clear;
+sigta=140/2;
+nt=0.75;
+//Let the flow rate be Q
+Q=0.25;
+v=1.2;
+D=1.13*sqrt(Q/v);
+D=520;
+p=0.7;
+C=9;
+t=(p*D)/(2*sigta*nt)+C;
+
+ // printing data in scilab o/p window
+ printf(" t is %0.1f mm ",t); \ No newline at end of file
diff --git a/683/CH10/EX10.2/PPJ_2.sce b/683/CH10/EX10.2/PPJ_2.sce
new file mode 100755
index 000000000..50a3fc4ab
--- /dev/null
+++ b/683/CH10/EX10.2/PPJ_2.sce
@@ -0,0 +1,37 @@
+// sum 10-2
+clc;
+clear;
+p=3*8;
+sigta=60;
+d=150;
+t=d/2*sqrt(((sigta+p)/(sigta-p))-1);
+t=75*sqrt((84/36)-1);
+t=40;
+do=d+(2*t);
+D=d+(2*t)+20;
+w=10;
+Ds=d+(2*w);
+P=%pi*(Ds^2)*8/4;
+sigp=310;
+FOS=4;
+sigb=77.5;
+At=P/(sigb*2);
+At=1300;
+D=250;
+db=45;
+b=D;
+a=1.8*b;
+CD=D+(2*db*1.2);
+sigp=310;
+Pr=0.75*sigp*At;
+Pr=Pr*10^-3;
+t=40;
+D1=d+(2*t)+20;
+D2=D1+(4.6*31);
+CD=D2-((3*t)+20);
+
+ // printing data in scilab o/p window
+ printf("Pr is %0.2f kN ",Pr);
+ printf("\n D1 is %0.0f mm ",D1);
+ printf("\n D2 is %0.1f mm ",D2);
+ printf("\n CD is %0.1f mm ",CD); \ No newline at end of file
diff --git a/683/CH10/EX10.3/PPJ_3.sce b/683/CH10/EX10.3/PPJ_3.sce
new file mode 100755
index 000000000..7e309de73
--- /dev/null
+++ b/683/CH10/EX10.3/PPJ_3.sce
@@ -0,0 +1,38 @@
+// sum 10-3
+clc;
+clear;
+p=14;
+d=50;
+sigyp=270;
+FOS=3;
+sigta=sigyp/FOS;
+pt=2*p;
+t=d/2*sqrt(((sigta+pt)/(sigta-pt))-1);
+t=10;
+D1=d+(2*t);
+Ds=D1+20;
+P=%pi*(Ds^2)*p/4;
+sigba=380/4;
+At=P/(4*sigba);
+At=245;
+db=20;
+Dd=70+(2*20)+5;
+R=db+2.5;
+B=(Dd/sqrt(2))+(2*(db+2.5));
+B=127;
+Y=Dd/(2*sqrt(2));
+Rm=34.12;
+M=(P*Y/2)+(P*Rm/%pi);
+sigfa=250/5;
+b=127/70;
+Z=b/6;
+tf=sqrt(M/(sigfa*Z));
+tf=44;
+
+ // printing data in scilab o/p window
+ printf("d is %0.0f mm ",d);
+ printf("\n t is %0.0f mm ",t);
+ printf("\n B is %0.0f mm ",B);
+ printf("\n R is %0.1f mm ",R);
+ printf("\n Y is %0.2f mm ",Y);
+ printf("\n tf is %0.0f mm ",tf); \ No newline at end of file
diff --git a/683/CH10/EX10.4/PPJ_4.sce b/683/CH10/EX10.4/PPJ_4.sce
new file mode 100755
index 000000000..3418b1bbc
--- /dev/null
+++ b/683/CH10/EX10.4/PPJ_4.sce
@@ -0,0 +1,32 @@
+// sum 10-4
+clc;
+clear;
+p=1.25;
+D=200;
+nt=0.75;
+C=9;
+sigta=20;
+t=(p*D)/(2*sigta*nt)+C;
+t=18;
+D1=D+(2*t);
+dr=D1+10;
+sigp=310;
+sigba=sigp/4;
+db=16;
+Db=dr+32+5;
+Do=Db+(2*db);
+P=%pi*(251+db)^2*1.25/4;
+n=6;
+Y=(Db-dr)/2;
+M=P/n*Y;
+Z=dr*tand(30)/6;
+tf=sqrt(M/(sigta*Z));
+tf=22;
+Deff=dr+db+5;
+
+ // printing data in scilab o/p window
+ printf("D is %0.0f mm ",D);
+ printf("\n t is %0.0f mm ",t);
+ printf("\n Y is %0.1f mm ",Y);
+ printf("\n tf is %0.0f mm ",tf);
+ printf("\n Deff is %0.0f mm ",Deff); \ No newline at end of file