diff options
Diffstat (limited to '3772/CH16')
-rw-r--r-- | 3772/CH16/EX16.1/Ex16_1.sce | 71 | ||||
-rw-r--r-- | 3772/CH16/EX16.2/Ex16_2.sce | 23 | ||||
-rw-r--r-- | 3772/CH16/EX16.3/Ex16_3.sce | 35 | ||||
-rw-r--r-- | 3772/CH16/EX16.4/Ex16_4.sce | 36 | ||||
-rw-r--r-- | 3772/CH16/EX16.5/Ex16_5.sce | 34 | ||||
-rw-r--r-- | 3772/CH16/EX16.6/Ex16_6.sce | 26 | ||||
-rw-r--r-- | 3772/CH16/EX16.7/Ex16_7.sce | 40 | ||||
-rw-r--r-- | 3772/CH16/EX16.8/Ex16_8.sce | 33 |
8 files changed, 298 insertions, 0 deletions
diff --git a/3772/CH16/EX16.1/Ex16_1.sce b/3772/CH16/EX16.1/Ex16_1.sce new file mode 100644 index 000000000..d53e30304 --- /dev/null +++ b/3772/CH16/EX16.1/Ex16_1.sce @@ -0,0 +1,71 @@ +// Problem 16.1,Page no.366 + +clc;clear; +close; + +t=1 //cm //thickness of plates +sigma_t=150 //MPa //Working stress +sigma_c=212.5 //MPa //crushing stress +sigma_s=94.5 //MPa //shearing stress + +//Calculation (Part-1) + +//P_s=%pi*4**-1*d**2*sigma_s //N //Shearing strength +//After substituting values and further simplifying we get +//P_s=%pi*4**-1*d**2*94.5*10**6 //N + +//P_c=d*t*sigma_c //N //crushing strength +//After substituting values and further simplifying we get +//P_c=d*1*10**-2*212.5*10**6 //N + +//P_t=(p-d)*t*sigma_t //N //Strength of plate in tearing +//After substituting values and further simplifying we get +//P_t=(p-d)*1*10**-2*150*10**6 + +//Now comparing strengths +//P_s=P_c +//%pi*4**-1*d**2*94.5*10**6=d*1*10**-2*212.5*10**6 +d=1*10**-2*212.5*10**6*(%pi*4**-1*94.5*10**6)**-1 //m //Diameter of rivet + +//Now comparing strengths +//P_t=P_c +//(p-d)*1*10**-2*150*10**6=d*1*10**-2*212.5*10**6 +//Afte further simplifying equation we get +//(p-d)=1.4166*d +p=(1.4166*d+d) //m //%pitch length of rivet + +P=p*sigma_t*10**6*t*10**-2 //N //Strength of solid plate //Answer for strength of solid plate is incorrect in textbook + +rho=(p-d)*p**-1*100 //Efficiency of the joint //Notification has been changed + +//Calculation (Part-2) + +//P_s=2*%pi*4**-1*d**2*sigma_s //N //Shearing strength +//After substituting values and further simplifying we get +//P_s=2*%pi*4**-1*d**2*94.5*10**6 //N + +//P_c=2*d*t*sigma_c //N //crushing strength +//After substituting values and further simplifying we get +//P_c=2*d*1*10**-2*212.5*10**6 //N + +//P_t=(p-d)*t*sigma_t //N //Strength of plate in tearing +//After substituting values and further simplifying we get +//P_t=(p-d)*1*10**-2*150*10**6 + +//Now comparing strengths +//P_s=P_c +//2*%pi*4**-1*d**2*94.5*10**6=2*d*1*10**-2*212.5*10**6 +d=1*10**-2*212.5*10**6*(%pi*4**-1*94.5*10**6)**-1 //m //Diameter of rivet + +//Now comparing strengths +//P_t=P_c +//(p-d)*1*10**-2*150*10**6=2*d*1*10**-2*212.5*10**6 +//Afte further simplifying equation we get +//(p-d)=2.833*d +p_1=(2.833*d+d) //m //%pitch length of rivets in shearing strength of plate //Notification for %pitch length has been changed + +rho_2=(p_1-d)*p_1**-1*100 //Efficiency of the joint //Notification has been changed + +//Result +printf("The Efficiency of joint in single rivet is %.2f %%",rho) +printf("\n The Efficiency of joint in double rivet is %.2f %%",rho_2) diff --git a/3772/CH16/EX16.2/Ex16_2.sce b/3772/CH16/EX16.2/Ex16_2.sce new file mode 100644 index 000000000..e307d6a21 --- /dev/null +++ b/3772/CH16/EX16.2/Ex16_2.sce @@ -0,0 +1,23 @@ +// Problem 16.2,Page no.367 + +clc;clear; +close; + +p=7.5 //cm //%pitch of rivets +t=1.5 //cm //Thickness of plate +d=2.5 //cm //diameter of rivets +sigma_t=400 //MPa //Working stress +sigma_c=640 //MPa //crushing stress +sigma_s=320 //MPa //shearing stress +n=2 //No. of rivets + +//Calculation + +P_t=(p-d)*t*10**-4*sigma_t*10**6*10**-3 //kN //Strength of plate in tearing +P_s=n*%pi*4**-1*d**2*10**-4*sigma_s*10**6*10**-3 //kN //Shearing strength +P_c=n*d*t*10**-4*sigma_c*10**6*10**-3 //kN //crushing strength + +//Thus Minimum force that will rapture the joint is least of P_t,P_s,P_c i.e P_t + +//Result +printf("Minimum force that will rapture the joint is %.2f",P_t);printf(" kN") diff --git a/3772/CH16/EX16.3/Ex16_3.sce b/3772/CH16/EX16.3/Ex16_3.sce new file mode 100644 index 000000000..7597f9873 --- /dev/null +++ b/3772/CH16/EX16.3/Ex16_3.sce @@ -0,0 +1,35 @@ +// Problem 16.3,Page no.367 + +clc;clear; +close; + +d_1=2 //cm //Diameter of rivets +p_1=6 //cm //%pitch of rivet +d_2=3 //cm //Diameter of rivet +p_2=8 //cm //%pitch of rivet +sigma_t=120 //MPa //Working stress +sigma_c=160 //MPa //crushing stress +sigma_s=90 //MPa //shearing stress +t=1.2 //cm //thickness of plate +n=2 //No. of rivets + +//Calculation (part-1) + +P_t=(p_1-d_1)*t*10**-4*sigma_t*10**6 //N //Strength of plate in tearing +P_s=n*%pi*4**-1*d_1**2*10**-4*sigma_s*10**6 //N //Shearing strength +P_c=n*d_1*t*10**-4*sigma_c*10**6 //N //crushing strength +P=p_1*t*10**-4*sigma_t*10**6 //N //Strength of solid per %pitch length + +rho_1=P_s*(P)**-1*100 //% //Efficiency of the joint + +//Calculation (part-2) + +P_t_2=(p_2-d_2)*t*10**-4*sigma_t*10**6 //N //Strength of plate in tearing +P_s_2=n*%pi*4**-1*d_2**2*10**-4*sigma_s*10**6 //N //Shearing strength +P_c_2=n*d_2*t*10**-4*sigma_c*10**6 //N //crushing strength +P_2=p_2*t*10**-4*sigma_t*10**6 //N //Strength of solid per %pitch length + +rho_2=P_t_2*(P_2)**-1*100 //% //Efficiency of the joint + +//Result +printf("First joint has higher Efficiency i.e %.2f",rho_1);printf(" %% than second joint") diff --git a/3772/CH16/EX16.4/Ex16_4.sce b/3772/CH16/EX16.4/Ex16_4.sce new file mode 100644 index 000000000..ae45eb84a --- /dev/null +++ b/3772/CH16/EX16.4/Ex16_4.sce @@ -0,0 +1,36 @@ +// Problem 16.4,Page no.368 + +clc;clear; +close; + +t=18 //mm //thickness of plates +sigma_t=100 //MPa //Tensile stress //Notification has been changed +sigma_s=70 //MPa //Shearing stress //Notification has been changed + +//Calculations + +d=6*t**0.5 //mm //Diameter of rivet //Answer is in correct in textbook +s=%pi*4**-1*d**2*10**-6*sigma_s*10**6 //N //Strength of one rivet in single shear //Answer is in correct in textbook + +//Consider strip of joint equal to %pitch p + +//S_1=(p-d)*t*10**-3*sigma_t*10**6 //Strength of plate against tearing along 1-1 +//After substituting values and further simplifying we get +//S_1=1800*p-45900 (Equation 1) + +//S_2=(p-d)*t*10**-3*sigma_t*10**6+s //Strength of plate against tearing along 1-1 +//After substituting values and further simplifying we get +//S_1=1800*p-56050.64 (Equation 2) + +//But the value of Equation 2 is smaller than Equation 1 + +//Strength of rivets in single shear is +S=4*s + +//Equating Equation 2 to shearing value +//1800*p-56050.64=S +p=(S+56050.64)*18000**-1 //cm //%pitch of rivet + +//Result +printf("Diameter of rivets is %.2f",d);printf(" mm") +printf("\n pitch of rivet is %.2f",p);printf(" cm") diff --git a/3772/CH16/EX16.5/Ex16_5.sce b/3772/CH16/EX16.5/Ex16_5.sce new file mode 100644 index 000000000..25401bf11 --- /dev/null +++ b/3772/CH16/EX16.5/Ex16_5.sce @@ -0,0 +1,34 @@ +// Problem 16.5,Page no.369 + +clc;clear; +close; + +t=12 //mm //Thickness of plate +d=24 //mm //Diameter of rivets +sigma_t=120 //MPa //stress in tension +sigma_s=200 //MPa //stress in double shear +sigma_b=200 //MPa //stress in Bearing +n=1 //No. of rivet + +//Calculation + +//P_t=(p-d)*t*10**-4*sigma_t*10**6 //N //Strength of plate in tearing +//After further simplifying we get +//P_t=(p-24)*14400 //N + +P_s=n*%pi*4**-1*d**2*10**-6*sigma_s*10**6 //N //Shearing strength of rivet in double shear + +P_b=n*d*10**-3*t*10**-3*sigma_b*10**6 //N //Bearing strength per %pitch length + +//Now Equating P_t to P_s or P_b whichever is small +//(p-24)*14400=P_b +p=P_b*14400**-1+24*10**-1 //cm //pitch of rivet +p_min=2.5*d*10**-1 //cm //Minimum pitch + +//Now adopting 6.4 cm %pitch + +rho=(p-d*10**-1)*p**-1*100 + +//Result +printf("pitch of rivet is %.2f",p);printf(" cm") +printf("\n Efficiency of joint is %.2f %%",rho) diff --git a/3772/CH16/EX16.6/Ex16_6.sce b/3772/CH16/EX16.6/Ex16_6.sce new file mode 100644 index 000000000..11d213674 --- /dev/null +++ b/3772/CH16/EX16.6/Ex16_6.sce @@ -0,0 +1,26 @@ +// Problem 16.6,Page no.370 + +clc;clear; +close; + +t=12 //mm //thickness of plate +d=18 //mm //Diameter of rivet +p=8 //cm //%pitch of rivet +sigma_t=460 //MPa //Tensile stress +sigma_s=320 //MPa //shearing stress +sigma_b=640 //MPa //bearing stress +n=2 //No. of rivet + +//Calculation + +P_t=(p-d*10**-1)*t*10**-1*10**-4*sigma_t*10**6 //N //Strength of plate in tearing +P_s=n*2*%pi*4**-1*d**2*10**-6*sigma_s*10**6 //N //Shearing strength of rivet pr %pitch length +P_b=n*d*10**-3*t*10**-3*sigma_b*10**6 //N //Bearing strength per %pitch length + +//The joint will fail at a pull of P_b + +S=p*t*sigma_t*10**6*10**-5 //N //strength of solid plate +rho=P_b*S**-1*100 //Efficiency of joint + +//Result +printf("Pull per pitch length at which joint will fail is %.2f",P_b);printf(" N") diff --git a/3772/CH16/EX16.7/Ex16_7.sce b/3772/CH16/EX16.7/Ex16_7.sce new file mode 100644 index 000000000..8f5e86937 --- /dev/null +++ b/3772/CH16/EX16.7/Ex16_7.sce @@ -0,0 +1,40 @@ +// Problem 16.7,Page no.370 + +clc;clear; +close; + +W=270 //KN //Load +t=14 //mm //thickness of plate +b=20 //cm //width of plate +d=20 //mm //diameter of rivet +sigma_s=70 //MPa //shear stress +sigma_b=190 //MPa //stress in bearing +sigma_t=110 //MPa //stress in tensile + +//Calculation + +S_1=1.75*%pi*4**-1*b**2*10**-4*sigma_s*10**6 //strength of one rivet in double shear +S_2=20*10**-3*t*10**-3*sigma_b*10**6 + +n=W*10**3*S_1**-1 + +//Adopt 7 rivets + +//The plates may tear along section 1-1 +W_1=(20-4)*10**-2*t*10**-3*sigma_t*10**6 //N //Permissible Load + +//The plates may tear along section 2-2,at the same time shearing the 4 rivets along 1-1 +W_2=(20-2*2)*10**-2*t*10**-3*sigma_t*10**6+2*S_1 //N //Permissible Load + +//The plates may tear along section 3-3,at the same time shearing the rivets along 1-1 and 2-2 +W_3=(20-3*2)*10**-2*t*10**-3*sigma_t*10**6+4*S_1 //N //Permissible Load + +W_s=7*S_1 //N //Load to shear all the rivets +W_c=7*S_2 //N //Load to crush all the rivets + +W_4=b*10**-2*t*10**-3*sigma_t*10**6 //N //Load carried by solid plate + +rho=W_1*W_4**-1*100 //% //Efficiency of joint + +//Result +printf("Efficiency of joint is %.2f %%",rho) diff --git a/3772/CH16/EX16.8/Ex16_8.sce b/3772/CH16/EX16.8/Ex16_8.sce new file mode 100644 index 000000000..c5138b52e --- /dev/null +++ b/3772/CH16/EX16.8/Ex16_8.sce @@ -0,0 +1,33 @@ +// Problem 16.8,Page no.371 + +clc;clear; +close; + +D=1.5 //cm //Diameter of boiler +rho=75 //% //Efficiency of joint +sigma_t=85 //MPa //stress in tension +sigma_s=70 //MPa //stress in shear +P=1 //MPa //Steam Pressure //Notification has been changed + +//Calculation + +t=P*10**6*D*(2*sigma_t*10**6*rho*10**-2)**-1*100 + +//Adopt 12 mm thickness of plate +t_1=12 //mm +d=6*t_1**0.5 + +//Adopt 21 mm diameter of rivet +d_1=21 //mm + +//P_t=(p-d_1*10**-1)*t*10**-1*10**-4*sigma_t*10**6 //N //Strength of plate in tearing +//After substituting values and further simplifying we get +//P_t=(p-2.1)*10200 //N + +P_s=1.875*%pi*4**-1*d_1**2*10**-6*2*sigma_s*10**6 + +//(p-d_1*10**-1)*10200=P_s +p=P_s*10200**-1+d_1*10**-1 + +//Result +printf("Pitch of plate is %.2f",p);printf(" cm") |