Merge pull request #1 from prashantsinalkar/masterHEADmaster

Initial commit

29 files changed, 10540 insertions, 0 deletions

diff --git a/Machine_Design_by_U_C_Jindal/10-PIPES_AND_PIPE_JOINTS.ipynb b/Machine_Design_by_U_C_Jindal/10-PIPES_AND_PIPE_JOINTS.ipynb
new file mode 100644
index 0000000..9878838
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/10-PIPES_AND_PIPE_JOINTS.ipynb
@@ -0,0 +1,226 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 10: PIPES AND PIPE JOINTS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 10.1: PPJ1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 10-1\n",
+"clc;\n",
+"clear;\n",
+"sigta=140/2;\n",
+"nt=0.75;\n",
+"//Let the flow rate be Q\n",
+"Q=0.25;\n",
+"v=1.2;\n",
+"D=1.13*sqrt(Q/v);\n",
+"D=520;\n",
+"p=0.7;\n",
+"C=9;\n",
+"t=(p*D)/(2*sigta*nt)+C;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' t is %0.1f mm     ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 10.2: PPJ2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 10-2\n",
+"clc;\n",
+"clear;\n",
+"p=3*8;\n",
+"sigta=60;\n",
+"d=150;\n",
+"t=d/2*sqrt(((sigta+p)/(sigta-p))-1);\n",
+"t=75*sqrt((84/36)-1);\n",
+"t=40;\n",
+"do=d+(2*t);\n",
+"D=d+(2*t)+20;\n",
+"w=10;\n",
+"Ds=d+(2*w);\n",
+"P=%pi*(Ds^2)*8/4;\n",
+"sigp=310;\n",
+"FOS=4;\n",
+"sigb=77.5;\n",
+"At=P/(sigb*2);\n",
+"At=1300;\n",
+"D=250;\n",
+"db=45;\n",
+"b=D;\n",
+"a=1.8*b;\n",
+"CD=D+(2*db*1.2);\n",
+"sigp=310;\n",
+"Pr=0.75*sigp*At;\n",
+"Pr=Pr*10^-3;\n",
+"t=40;\n",
+"D1=d+(2*t)+20;\n",
+"D2=D1+(4.6*31);\n",
+"CD=D2-((3*t)+20);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Pr is %0.2f kN     ',Pr);\n",
+"  printf('\n D1 is %0.0f mm     ',D1);\n",
+"  printf('\n D2 is %0.1f mm     ',D2);\n",
+"  printf('\n CD is %0.1f mm     ',CD);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 10.3: PPJ3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 10-3\n",
+"clc;\n",
+"clear;\n",
+"p=14;\n",
+"d=50;\n",
+"sigyp=270;\n",
+"FOS=3;\n",
+"sigta=sigyp/FOS;\n",
+"pt=2*p;\n",
+"t=d/2*sqrt(((sigta+pt)/(sigta-pt))-1);\n",
+"t=10;\n",
+"D1=d+(2*t);\n",
+"Ds=D1+20;\n",
+"P=%pi*(Ds^2)*p/4;\n",
+"sigba=380/4;\n",
+"At=P/(4*sigba);\n",
+"At=245;\n",
+"db=20;\n",
+"Dd=70+(2*20)+5;\n",
+"R=db+2.5;\n",
+"B=(Dd/sqrt(2))+(2*(db+2.5));\n",
+"B=127;\n",
+"Y=Dd/(2*sqrt(2));\n",
+"Rm=34.12;\n",
+"M=(P*Y/2)+(P*Rm/%pi);\n",
+"sigfa=250/5;\n",
+"b=127/70;\n",
+"Z=b/6;\n",
+"tf=sqrt(M/(sigfa*Z));\n",
+"tf=44;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n B is %0.0f mm     ',B);\n",
+"  printf('\n R is %0.1f mm     ',R);\n",
+"  printf('\n Y is %0.2f mm     ',Y);\n",
+"  printf('\n tf is %0.0f mm     ',tf);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 10.4: PPJ4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 10-4\n",
+"clc;\n",
+"clear;\n",
+"p=1.25;\n",
+"D=200;\n",
+"nt=0.75;\n",
+"C=9;\n",
+"sigta=20;\n",
+"t=(p*D)/(2*sigta*nt)+C;\n",
+"t=18;\n",
+"D1=D+(2*t);\n",
+"dr=D1+10;\n",
+"sigp=310;\n",
+"sigba=sigp/4;\n",
+"db=16;\n",
+"Db=dr+32+5;\n",
+"Do=Db+(2*db);\n",
+"P=%pi*(251+db)^2*1.25/4;\n",
+"n=6;\n",
+"Y=(Db-dr)/2;\n",
+"M=P/n*Y;\n",
+"Z=dr*tand(30)/6;\n",
+"tf=sqrt(M/(sigta*Z));\n",
+"tf=22;\n",
+"Deff=dr+db+5;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('D is %0.0f mm     ',D);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n Y is %0.1f mm     ',Y);\n",
+"  printf('\n tf is %0.0f mm     ',tf);\n",
+"  printf('\n Deff is %0.0f mm     ',Deff);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/11-RIVETED_JOINTS.ipynb b/Machine_Design_by_U_C_Jindal/11-RIVETED_JOINTS.ipynb
new file mode 100644
index 0000000..0f3cb32
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/11-RIVETED_JOINTS.ipynb
@@ -0,0 +1,394 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 11: RIVETED JOINTS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.1: RJ1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-1\n",
+"clc;\n",
+"clear;\n",
+"t=20;\n",
+"p=100;\n",
+"d=25;\n",
+"sigt=40;\n",
+"P=(p-d)*t*sigt;\n",
+"Ts=(4*P)/(%pi*d^2);\n",
+"sigb=P/(d*t);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.0f N     ',P);\n",
+"  printf('\n Ts is %0.2f MPa     ',Ts);\n",
+"  printf('\n sigb is %0.0f MPa     ',sigb);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.2: RJ2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-2\n",
+"clc;\n",
+"clear;\n",
+"t=22;\n",
+"t1=5*t/8;\n",
+"d=30;\n",
+"p=100;\n",
+"sigt=75;\n",
+"P=(p-d)*t*sigt;\n",
+"Ts=(2*P)/(%pi*d^2);\n",
+"sigb=P/(d*t);\n",
+"P=P*10^-3\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.1f kN     ',P);\n",
+"  printf('\n Ts is %0.1f MPa     ',Ts);\n",
+"  printf('\n sigb is %0.0f N/mm^2     ',sigb);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.3: RJ3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//sum 11-3\n",
+"clc;\n",
+"clear;\n",
+"t=15;\n",
+"t1=5*t/8;\n",
+"d=25;\n",
+"n=2;\n",
+"Ta=80;\n",
+"sigta=100;\n",
+"sigba=120;\n",
+"Ps=n*1.875*%pi*d^2*Ta/4;\n",
+"Pb=n*d*t*sigba;\n",
+"p=Pb/(t*Ta)+d;\n",
+"Pp=p*t*Ta;\n",
+"n=Pb/Pp;\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('p is %0.0f mm     ',p);\n",
+"  printf('\n n is %0.2f      ',n);\n",
+" "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.4: RJ4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-4\n",
+"clc;\n",
+"clear;\n",
+"b=200;\n",
+"t=16;\n",
+"d=6*sqrt(t);\n",
+"sigta=80;\n",
+"Ta=60;\n",
+"sigba=100;\n",
+"Pt=(b-d)*t*sigta;\n",
+"Ps=1.875*%pi*d^2*Ta/4;\n",
+"Pb=d*t*sigba;\n",
+"n1=Pt/Pb;\n",
+"n1=6;\n",
+"Pt2=((b-(2*d))*t*sigta)+Pb;\n",
+"Pt3=((b-(3*d))*t*sigta)+(3*Pb);\n",
+"Pp=b*t*sigta;\n",
+"n2=Pt/Pp;\n",
+"n2=n2*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n n1 is %0.0f      ',n1);\n",
+"  printf('\n Pt is %0.0f N      ',Pt);\n",
+"  printf('\n Pt2 is %0.0f N     ',Pt2);\n",
+"  printf('\n Pt3 is %0.0f N     ',Pt3);\n",
+"  printf('\n n2 is %0.0f      ',n2);\n",
+"  \n",
+"  //Answer to strength of rivet in bearing 'Pb' is calculated incorrectly in the book, hence Pt2,Pt3 is calculated subsequently incorrect."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.5: RJ5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-5\n",
+"clc;\n",
+"clear;\n",
+"a=50;\n",
+"b=75;\n",
+"P=36*10^3;\n",
+"d=24;\n",
+"Ta=60;\n",
+"n=9;\n",
+"A=%pi*d^2/4;\n",
+"Td=P/(n*A);\n",
+"theta=atan(b/a);\n",
+"Ts=54.64;\n",
+"r2=90.184;\n",
+"e=A*29575.7/P;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' e is %0.1f mm     ',e);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.6: RJ6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-6\n",
+"clc;\n",
+"clear;\n",
+"P=12*10^3;\n",
+"Tmax=100;\n",
+"n=6;\n",
+"e=50+50+(5/2);\n",
+"T=P*e;\n",
+"Td=P/n;\n",
+"ra=125;\n",
+"k=T/((2*125^2)+(2*75^2)+(2*25^2));\n",
+"Tr=(k*ra)+Td;\n",
+"A=Tr/Tmax;\n",
+"d=sqrt(A*4/%pi);\n",
+"d=12;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' d is %0.0f mm     ',d);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.7: RJ7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-7\n",
+"clc;\n",
+"clear;\n",
+"t=15;\n",
+"d=6*sqrt(t);\n",
+"d=24;\n",
+"sigta=75;\n",
+"sigba=105;\n",
+"Ta=60;\n",
+"n=4;\n",
+"Pt=n*%pi*d^2*Ta/4;\n",
+"x=d*t*sigta;\n",
+"y=2*t*sigta;\n",
+"p=(Pt+x)/y;\n",
+"p=60;\n",
+"C=4.17;\n",
+"pmax=(C*t)+41.28;\n",
+"Pt1=(y*p)-x;\n",
+"Ps=n*%pi*d^2*Ta/4;\n",
+"Pb=n*d*t*sigba;\n",
+"S=2*p*t*sigta;\n",
+"n=Pt1/S;\n",
+"n=n*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' n is %0.0f      ',n);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.8: RJ8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-8\n",
+"clc;\n",
+"clear;\n",
+"D=1500;\n",
+"p=2;\n",
+"nt=0.75;\n",
+"sigut=420;\n",
+"FOS=5;\n",
+"sigta=sigut/FOS;\n",
+"t=p*D/(2*sigta*nt);\n",
+"t=24;\n",
+"d=6*sqrt(t);\n",
+"d=30;\n",
+"Ta=330/5;\n",
+"sigba=640/5;\n",
+"Ps=2*1.875*%pi*(d^2)*Ta/4;\n",
+"p=(Ps/(t*sigta))+d;\n",
+"p=117;\n",
+"t1=5*t/8;\n",
+"Pt=(p-d)*t*sigta;\n",
+"Pp=p*t*sigta;\n",
+"Pb=2*d*t*sigba;\n",
+"n=Ps/Pb;\n",
+"n=n*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' n is %0.0f      ',n);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 11.9: RJ9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 11-9\n",
+"clc;\n",
+"clear;\n",
+"D=1200;\n",
+"p=2.5;\n",
+"sigba=110;\n",
+"Pa=%pi*D^2*p/4;\n",
+"nt=0.8;\n",
+"sigta=80;\n",
+"t=p*D/(2*sigta*nt);\n",
+"t=24;\n",
+"d=6*sqrt(t);\n",
+"d=30;\n",
+"Ta=55;\n",
+"Ps=%pi*(d^2)*Ta/4;\n",
+"Np=Pa/Ps;\n",
+"Np=74;\n",
+"nr=Np/2;\n",
+"p=%pi*(D+t)/nr;\n",
+"pb=2*d;\n",
+"m=1.5*d;\n",
+"Pt=(p-d)*t*sigta;\n",
+"Ps=2*Ps;\n",
+"Pb=2*d*t*sigba;\n",
+"Pp=p*t*sigta;\n",
+"n=Ps/Pp;\n",
+"n=n*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' n is %0.0f      ',n);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/12-WELDED_JOINTS.ipynb b/Machine_Design_by_U_C_Jindal/12-WELDED_JOINTS.ipynb
new file mode 100644
index 0000000..5094d67
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/12-WELDED_JOINTS.ipynb
@@ -0,0 +1,412 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 12: WELDED JOINTS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.10: WJ10.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-10\n",
+"clc;\n",
+"clear;\n",
+"P=300*10^3;\n",
+"l=500;\n",
+"A=2*l;\n",
+"Td=P/A;\n",
+"T=(350-250)*P;\n",
+"IG=(l^3*2/12)+(l*2*5^2);\n",
+"r=sqrt(250^2+5^2);\n",
+"Ts=T*r/IG;\n",
+"Ts=Ts+Td;\n",
+"Ta=110;\n",
+"t=Ts/Ta;\n",
+"h=t/0.707;\n",
+"h=9;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.0f mm     ',h);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.11: WJ11.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-11\n",
+"clc;\n",
+"clear;\n",
+"t=30;\n",
+"sigut=417;\n",
+"sige=sigut/2;\n",
+"Ka=0.5;\n",
+"Kb=0.85;\n",
+"Kc=0.897;\n",
+"SCF=1.2;\n",
+"Kd=1/SCF;\n",
+"FOS=1.5;\n",
+"sige1=sige*Ka*Kb*Kc*Kd/FOS;\n",
+"Pa=60*10^3;\n",
+"l=Pa/(sige1*t);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('l is %0.1f mm     ',l);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.1: WJ1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-1\n",
+"clc;\n",
+"clear;\n",
+"h=8;\n",
+"F=100*10^3;\n",
+"t=0.707*h;\n",
+"A=4*60*t;\n",
+"T=F/A;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T is %0.1f MPa     ',T);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.2: WJ2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-2\n",
+"clc;\n",
+"clear;\n",
+"FOS=3;\n",
+"Ta=95/FOS;\n",
+"P=350*10^3;\n",
+"h=12.5;\n",
+"t=0.707*h;\n",
+"l=P/(2*t*Ta);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('l is %0.0f mm     ',l);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.3: WJ3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-3\n",
+"clc;\n",
+"clear;\n",
+"h=12;\n",
+"t=0.707*h;\n",
+"l=60;\n",
+"Ta=80;\n",
+"P=2*l*t*Ta;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.3f kN     ',P);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.4: WJ4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-4\n",
+"clc;\n",
+"clear;\n",
+"P=6*10^3;\n",
+"e=150+(100/2);\n",
+"T=P*e;\n",
+"A=200;\n",
+"Td=P/A;\n",
+"r=sqrt(2*50^2);\n",
+"Ixx=2*(100*50^2);\n",
+"Iyy=2*100^3/12;\n",
+"IG=Ixx+Iyy;\n",
+"Ts=r*T/IG;\n",
+"Tmax=sqrt((Ts*sind(45))^2+(Td+(Ts*cosd(45)))^2);\n",
+"Ta=80;\n",
+"t=Tmax/Ta;\n",
+"h=sqrt(2)*t;\n",
+"h=3;\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.0f mm     ',h);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.5: WJ5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-5\n",
+"clc;\n",
+"clear;\n",
+"h=10;\n",
+"t=10/sqrt(2);\n",
+"Ta=80;\n",
+"x=((50*25)+(50*0))/(50+50);\n",
+"y=x;\n",
+"ra=sqrt(x^2+37.5^2);\n",
+"Ixx=(7.07*50^3/12)+(50*7.07*(12.5^2))+(50*7.07*12.5^2);\n",
+"IG=2*Ixx;\n",
+"e=100+(50-12.5);\n",
+"Tr=16.09*10^-3;\n",
+"P=Ta/Tr;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.3f KN     ',P);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.6: WJ6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-6\n",
+"clc;\n",
+"clear;\n",
+"P=16*10^3;\n",
+"l=300;\n",
+"r=50;\n",
+"M=P*l;\n",
+"A=2*%pi*r;\n",
+"Ixx=%pi*r^3;\n",
+"sigb=M*r/Ixx;\n",
+"Td=P/A;\n",
+"Tmax=sqrt((sigb/2)^2+(Td^2));\n",
+"Ta=90;\n",
+"t=Tmax/Ta;\n",
+"h=sqrt(2)*t;\n",
+"h=5;\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.0f mm     ',h);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.7: WJ7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-7\n",
+"clc;\n",
+"clear;\n",
+"sigut=415;\n",
+"sige=sigut/3;\n",
+"Ka=0.5;\n",
+"Kb=0.85;\n",
+"Kc=0.897;\n",
+"SCF=1.5;\n",
+"Kd=1/SCF;\n",
+"FOS=2;\n",
+"sige1=sige*Ka*Kb*Kc*Kd/FOS;\n",
+"Pa=50*10^3;\n",
+"h=10;\n",
+"t=0.707*h;\n",
+"l=Pa/(2*sige1*t);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('l is %0.0f mm     ',l);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.8: WJ8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-8\n",
+"clc;\n",
+"clear;\n",
+"l=300;\n",
+"P=30*10^3;\n",
+"T=P/(2*l);\n",
+"Ta=124;\n",
+"t1=T/Ta;\n",
+"h1=sqrt(2)*t1;\n",
+"M=P*l;\n",
+"Ixx=2*100*110^2;\n",
+"sigb=M/Ixx*110;\n",
+"//Let the allowable bending stress is Tab\n",
+"Tab=200;\n",
+"t2=sigb/Tab;\n",
+"h2=t2/0.707;\n",
+"h2=3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.0f mm     ',h2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 12.9: WJ9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 12-9\n",
+"clc;\n",
+"clear;\n",
+"Ta=60;\n",
+"l1=60;\n",
+"l2=40;\n",
+"P1=Ta*0.707*l1;\n",
+"P2=Ta*0.707*l2;\n",
+"P=80*10^3;\n",
+"h=P/(P1+P2);\n",
+"h=20;\n",
+"a=(P2*100)/(P1+P2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.0f mm     ',h);\n",
+"  printf('\n a is %0.0f mm     ',a);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/13-COTTER_AND_KNUCKLE_JOINTS.ipynb b/Machine_Design_by_U_C_Jindal/13-COTTER_AND_KNUCKLE_JOINTS.ipynb
new file mode 100644
index 0000000..a120516
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/13-COTTER_AND_KNUCKLE_JOINTS.ipynb
@@ -0,0 +1,235 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 13: COTTER AND KNUCKLE JOINTS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 13.1: CKJ1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//sum 13-1\n",
+"clc;\n",
+"clear;\n",
+"F=25*10^3;\n",
+"sigat=50;\n",
+"Ta=40;\n",
+"pa=80;\n",
+"d=sqrt((4*F)/(%pi*sigat));\n",
+"d=26;\n",
+"t=d/4;\n",
+"t=7;\n",
+"d1=1.2*d;\n",
+"d1=32;\n",
+"pc=F/(d1*t);\n",
+"t=10;\n",
+"c=0.75*d;\n",
+"c=20;\n",
+"d2=44;\n",
+"tw=(d2-d1)/2;\n",
+"b=F/(2*t*Ta);\n",
+"b=34;\n",
+"a=0.5*d;\n",
+"d3=(F/(pa*t))+d1;\n",
+"d3=64;\n",
+"e=F/(Ta*(d3-d1));\n",
+"d4=sqrt((F*4/(%pi*pa))+d1^2);\n",
+"d4=40;\n",
+"f=0.5*d;\n",
+"sigbc=3*F*d3/(t*b^2*4);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' d is %0.0f mm     ',d);\n",
+"  printf('\n d1 is %0.0f mm     ',d1);\n",
+"  printf('\n d2 is %0.0f mm     ',d2);\n",
+"  printf('\n d3 is %0.0f mm     ',d3);\n",
+"  printf('\n d4 is %0.0f mm     ',d4);\n",
+"  printf('\n sigbc is %0.1f MPa     ',sigbc);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 13.2: CKJ2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 13-2\n",
+"clc;\n",
+"clear;\n",
+"P=40*10^3;\n",
+"sigut=490;\n",
+"FOS=4;\n",
+"sigts=sigut/FOS;\n",
+"sigcs=1.4*sigts;\n",
+"sigs=0.8*sigts;\n",
+"d=sqrt((4*P)/(%pi*sigts));\n",
+"d=21;\n",
+"sigcc=1.4*330/4;\n",
+"Tc=0.8*330/4;\n",
+"t=d/3;\n",
+"b=P/(2*t*Tc);\n",
+"b=31;\n",
+"t=10;\n",
+"d1=28;\n",
+"d2=40;\n",
+"c=d/2;\n",
+"c=15;\n",
+"a=P/(2*(d2-d1)*98);\n",
+"a=20;\n",
+"L=(2*a)+(2*b)+(2*c)+(2*3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n d1 is %0.0f mm     ',d1);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  printf('\n d2 is %0.0f mm     ',d2);\n",
+"  printf('\n L is %0.0f mm     ',L);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 13.3: CKJ3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 13-3\n",
+"clc;\n",
+"clear;\n",
+"P=40*10^3;\n",
+"sigt=60;\n",
+"sigc=125;\n",
+"T=45;\n",
+"a=sqrt(P*3/(2*sigt));\n",
+"a=33;\n",
+"t=a/3;\n",
+"b=P/(4.5*t*T);\n",
+"b=20;\n",
+"b1=1.25*b;\n",
+"t1=P*3/(4*a*sigt);\n",
+"t1=16;\n",
+"l2=P/(2*2*T*t1);\n",
+"l2=14;\n",
+"l1=P/(2*a*T);\n",
+"l1=14;\n",
+"l3=(0.6*a);\n",
+"l3=20;\n",
+"l4=11;\n",
+"sigcr=P/(t*a);\n",
+"sigcr1=P/(2*t1*t);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('a is %0.0f mm     ',a);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n t1 is %0.0f mm     ',t1);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  printf('\n b1 is %0.0f mm     ',b1);\n",
+"  printf('\n l1 is %0.0f mm     ',l1);\n",
+"  printf('\n l2 is %0.0f mm     ',l2);\n",
+"  printf('\n l3 is %0.0f mm     ',l3);\n",
+"  printf('\n l4 is %0.0f mm     ',l4);\n",
+"  printf('\n sigcr is %0.1f MPa     ',sigcr);\n",
+"  printf('\n sigcr1 is %0.1f MPa     ',sigcr1);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 13.4: CKJ4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 13-4\n",
+"clc;\n",
+"clear;\n",
+"P=50*10^3;\n",
+"sigp=380;\n",
+"FOS=4;\n",
+"sigca=80;\n",
+"Ta=50;\n",
+"sigta=sigp/FOS;\n",
+"At=P/sigta;\n",
+"d=30;\n",
+"d1=1.5*d;\n",
+"t=P/(sigca*d1);\n",
+"t=14;\n",
+"A=(%pi*(d1^2)/4)-(d1*t);\n",
+"//let tearing stress be sigt\n",
+"sigt=P/A;\n",
+"b=P/(2*t*Ta);\n",
+"b=36;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n sigt is %0.1f MPa     ',sigt);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  \n",
+"  //The answer to tearing stress in bolt 'sigt' is calculated incorrectly in the book."
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/14-KEYS_AND_COUPLINGS.ipynb b/Machine_Design_by_U_C_Jindal/14-KEYS_AND_COUPLINGS.ipynb
new file mode 100644
index 0000000..5726116
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/14-KEYS_AND_COUPLINGS.ipynb
@@ -0,0 +1,364 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 14: KEYS AND COUPLINGS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.1: KC1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-1\n",
+"clc;\n",
+"clear;\n",
+"d=40;\n",
+"r=d/2;\n",
+"P=6*10^3;\n",
+"N=350;\n",
+"sigyt=380;\n",
+"A=%pi*12^2/2;\n",
+"theta=%pi-(2*atan(4/12));\n",
+"alpha=180-(theta*%pi/180);\n",
+"l=2*12*cosd(19.5);\n",
+"A1=l*4/2;\n",
+"Abcd=(A*141/180)-A1;\n",
+"A2=A-Abcd;\n",
+"A3=8*l;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"Pt=T*10^3/r;\n",
+"sigb=Pt/A2;\n",
+"//Let shear stress developed in key Tk\n",
+"Tk=Pt/A3;\n",
+"FOS1=sigyt/sigb;\n",
+"FOS2=0.577*sigyt/Tk;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('FOS1 is %0.3f     ',FOS1);\n",
+"  printf('\n FOS2 is %0.2f     ',FOS2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.2: KC2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-2\n",
+"clc;\n",
+"clear;\n",
+"n=12;\n",
+"phi=360*%pi/(180*12*2);\n",
+"R1=45/2;\n",
+"R2=50/2;\n",
+"l=60;\n",
+"Rm=(R1+R2)/2;\n",
+"p=6.5;\n",
+"Pn=(R2-R1)*l*p;\n",
+"T=Pn*Rm;\n",
+"T=T*n;\n",
+"N=400;\n",
+"w=2*%pi*N/60;\n",
+"P=T*w;\n",
+"A=(%pi*R1*l)/n;\n",
+"Ts=Pn/A;\n",
+"Ah=(%pi*R2*l)/n;\n",
+"Th=Pn/Ah;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ts is %0.2f N/mm^2     ',Ts);\n",
+"  printf('\n Th is %0.2f N/mm^2    ',Th);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.3: KC3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-3\n",
+"clc;\n",
+"clear;\n",
+"N=360;\n",
+"w=2*%pi*N/60;\n",
+"sigyt=380;\n",
+"r=25;\n",
+"P=40*10^3;\n",
+"FOS=3;\n",
+"T=P/w;\n",
+"Pt=T*10^3/(2*r);\n",
+"siga=380/3;\n",
+"Ta=0.577*380/3;\n",
+"l1=Pt/(sqrt(2)*12*Ta);\n",
+"l2=Pt*sqrt(2)/(siga*12);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('l1 is %0.0f mm     ',l1);\n",
+"  printf('\n l2 is %0.2f mm     ',l2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.4: KC4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-4\n",
+"clc;\n",
+"clear;\n",
+"N=300;\n",
+"w=2*%pi*N/60;\n",
+"P=12*10^3;\n",
+"Ks=1.25;\n",
+"Pd=P*Ks;\n",
+"T=Pd/w;\n",
+"Tas=50;\n",
+"d=16*T*10^3/(%pi*Tas);\n",
+"d=d^(1/3);\n",
+"d=40;\n",
+"Ts=10;\n",
+"d1=(2*d)+13;\n",
+"x=(d1^4-d^4)/d1;\n",
+"//Let the shear stress in the key be Tsh\n",
+"Tsh=T*10^3*16/(%pi*x);\n",
+"l=3.5*d;\n",
+"Ft=T*2*10^3/d;\n",
+"l1=70;\n",
+"sigak=50;\n",
+"b=Ft/(l1*sigak);\n",
+"t=2*Ft/(100*l1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n Tsh is %0.2f MPa     ',Tsh);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  printf('\n t is %0.0f mm     ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.5: KC5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-5\n",
+"clc;\n",
+"clear;\n",
+"P=36*10^3;\n",
+"N=200;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"Tas=45;\n",
+"d=16*T*10^3/(%pi*Tas);\n",
+"d=d^(1/3);\n",
+"d=60;\n",
+"d1=(2*d)+13;\n",
+"l=3.5*d;\n",
+"Ftk=T*2/d;\n",
+"lk=l/2;\n",
+"Tak=40;\n",
+"sigack=90;\n",
+"b=Ftk*10^3/(lk*Tak);\n",
+"t=2*Ftk*10^3/(sigack*lk);\n",
+"n=4;\n",
+"sigatb=60;\n",
+"u=0.25;\n",
+"dr=16*T*10^3/(u*%pi^2*sigatb*n*d);\n",
+"dr=sqrt(dr);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n b is %0.1f mm     ',b);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n dr is %0.3f mm     ',dr);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.6: KC6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-5\n",
+"clc;\n",
+"clear;\n",
+"P=16*10^3;\n",
+"N=1000;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"Ks=1.4;\n",
+"Td=T*Ks;\n",
+"Tas=40;\n",
+"d=16*T*10^3/(%pi*Tas);\n",
+"d=d^(1/3);\n",
+"d=32;\n",
+"d1=2*d;\n",
+"l=1.5*d;\n",
+"ds=1.5*d;\n",
+"Tak=40;\n",
+"sigack=70;\n",
+"Ftk=Td*2/d;\n",
+"b=Ftk*10^3/(l*Tak);\n",
+"t=2*Ftk*10^3/(sigack*l);\n",
+"Taf=10;\n",
+"tf=Td*10^3*2/(%pi*Taf*d1^2);\n",
+"Ftb=Td*10^3/(1.5*d*4);\n",
+"Tab=40;\n",
+"db=sqrt(Ftb*4/(Tab*%pi));\n",
+"D=4*d;\n",
+"trp=d/6;\n",
+"Ftb1=Td*10^3/(45*4);\n",
+"db1=sqrt(Ftb1*4/(Tab*%pi));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n db is %0.2f mm     ',db);\n",
+"  printf('\n db1 is %0.2f mm     ',db1);\n",
+"  \n",
+"  //The answer to Key thickness 't' is calculated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 14.7: KC7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 14-5\n",
+"clc;\n",
+"clear;\n",
+"P=30*10^3;\n",
+"N=1440;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"d=36;\n",
+"d1=30;\n",
+"d2=2*d;\n",
+"d3=d1*2;\n",
+"l=1.5*d;\n",
+"Dp=3.5*d;\n",
+"n=6;\n",
+"Ft=(2*T)/(Dp*n);\n",
+"p=0.5;\n",
+"A=Ft/p;\n",
+"Lf=d;\n",
+"dp=A/Lf;\n",
+"M=Ft*10^3*(5+(Lf/2));\n",
+"db=(32*M/(%pi*40))^(1/3);\n",
+"db=15;\n",
+"T=(4*526)/(%pi*db^2);\n",
+"sigb=32*M/(%pi*db^3);\n",
+"sigmax=(sigb/2)+sqrt(((sigb/2)^2)+(T^2));\n",
+"b=d/4;\n",
+"t=6;\n",
+"Lf=36;\n",
+"La=10;\n",
+"Do=126+30+(2*(5+1))+(2*6);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigmax is %0.2f MPa     ',sigmax);\n",
+"  printf('\n b is %0.0f mm     ',b);\n",
+"  printf('\n t is %0.0f mm     ',t);\n",
+"  printf('\n Lf is %0.0f mm     ',Lf);\n",
+"  printf('\n Do is %0.0f mm     ',Do);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/15-SHAFTS.ipynb b/Machine_Design_by_U_C_Jindal/15-SHAFTS.ipynb
new file mode 100644
index 0000000..8b5989d
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/15-SHAFTS.ipynb
@@ -0,0 +1,316 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 15: SHAFTS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.2: S2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-2\n",
+"clc;\n",
+"clear;\n",
+"dA=150;\n",
+"dB=250;\n",
+"alpha=20*%pi/180;\n",
+"W=400;\n",
+"sigyt=400;\n",
+"sigut=500;\n",
+"Kb=1.5;\n",
+"Kt=2;\n",
+"T=W*dA/2;\n",
+"Pt=T/(dB/2);\n",
+"Pr1=W*tan(alpha);\n",
+"Pr2=Pt*tan(alpha);\n",
+"RDH=((W*120)-(Pt*320))/440;\n",
+"RcH=W-RDH-Pt;\n",
+"//RcH=400+65.5-240;\n",
+"McH=0;\n",
+"MAH=RcH*120;\n",
+"MBH=RDH*120;\n",
+"RDV=((Pr1*120)-(Pr2*320))/440;\n",
+"RcV=Pr1-RDV-Pr2;\n",
+"MAV=RcV*120;\n",
+"MBV=RDV*120;\n",
+"Mmax=sqrt((MAH^2)+(MAV^2));\n",
+"T=30*10^3;\n",
+"Ta=0.135*sigut;\n",
+"d=16*sqrt((Kb*Mmax)^2+(Kt*T)^2)/(%pi*Ta);\n",
+"d=d^(1/3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.2f mm    ',d);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.3: S3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-3\n",
+"clc;\n",
+"clear;\n",
+"P=16*746;\n",
+"N=3000;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w*10^3;\n",
+"sigy=400;\n",
+"Ty=sigy/2;\n",
+"FOS=2;\n",
+"Ta=Ty/FOS;\n",
+"d=T*16/(%pi*Ta);\n",
+"d1=d^(1/3);\n",
+"r=3;\n",
+"D=d1+(2*r);\n",
+"SCF=1.196\n",
+"Tys=Ta/SCF;\n",
+"d=T*16/(%pi*Tys);\n",
+"d2=d^(1/3);\n",
+"d=14;\n",
+"D=d+(2*r);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d1 is %0.2f mm    ',d1);\n",
+"  printf('\n d2 is %0.2f mm    ',d2);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.4: S4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-4\n",
+"clc;\n",
+"clear;\n",
+"P1=24*10^3;\n",
+"P2=10*10^3;\n",
+"sigyt=460;\n",
+"Tya=sigyt*0.3;\n",
+"SCF=2.84;\n",
+"Ta=Tya/SCF;\n",
+"N=400;\n",
+"w=2*%pi*N/60;\n",
+"T1=P1/w;\n",
+"T2=P2/w;\n",
+"d1=T1*16*10^3/(%pi*Ta);\n",
+"d1=d1^(1/3);\n",
+"d2=T2*16*10^3/(%pi*Ta);\n",
+"d2=d2^(1/3);\n",
+"theta1=%pi/3600;\n",
+"l1=120;\n",
+"G=84*10^3;\n",
+"d3=T1*10^3*l1*32/(%pi*G*theta1);\n",
+"d3=d3^(1/4);\n",
+"d4=T2*l1*10^3*32/(%pi*G*theta1);\n",
+"d4=d4^(1/4);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d1 is %0.2f mm    ',d1);\n",
+"  printf('\n d2 is %0.2f mm    ',d2);\n",
+"  printf('\n d3 is %0.1f mm    ',d3);\n",
+"  printf('\n d4 is %0.2f mm    ',d4);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.5: S5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-5\n",
+"clc;\n",
+"clear;\n",
+"d=200;\n",
+"r=d/2;\n",
+"N=300;\n",
+"P=5000;\n",
+"D=500;\n",
+"R=D/2;\n",
+"u=0.3;\n",
+"E=205*10^3;\n",
+"G=84*10^3;\n",
+"Ta=60;\n",
+"Kb=1.5;\n",
+"Kt=2;\n",
+"w=2*%pi*N/60;\n",
+"beta1=20*%pi/180;\n",
+"V=r*w;\n",
+"v=R*w;\n",
+"// Let T1-T2 =T\n",
+"T=P/V;\n",
+"x=u*%pi/sin(beta1);\n",
+"T2=T/((exp(x)-1));\n",
+"T1=T2*exp(x);\n",
+"t=P/v;\n",
+"y=u*%pi;\n",
+"T3=t/((exp(x)-1));\n",
+"T4=T3*exp(x);\n",
+"T=P/w;\n",
+"Rc=2612;;\n",
+"RA=645.1;\n",
+"MB=96.76;\n",
+"MC=-208.96;\n",
+"d=16*10^3*sqrt((Kb*MC)^2+(Kt*T)^2)/(%pi*Ta);\n",
+"d=d^(1/3);\n",
+"l=380;\n",
+"J=%pi*d^4/32;\n",
+"theta=T*10^3*l/(G*J);\n",
+"theta=theta*180/%pi;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm    ',d);\n",
+"  printf('\n theta is %0.2f deg    ',theta);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.6: S6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-6\n",
+"clc;\n",
+"clear;\n",
+"T=400;\n",
+"Pt=4800;\n",
+"Pg=3600;\n",
+"sigyt=360;\n",
+"E=205*10^3;\n",
+"G=80*10^3;\n",
+"Kb=2;\n",
+"Kt=1.5;\n",
+"FOS=3;\n",
+"RC=((Pt*90)+(Pg*200))/140;\n",
+"RA=8400-RC;\n",
+"MB=RA*0.9;\n",
+"MC=Pg*0.045;\n",
+"Te=sqrt((Kb*MC)^2+(Kt*T)^2);\n",
+"Ta=0.577*sigyt/FOS;\n",
+"d=16*10^3*Te/(%pi*Ta);\n",
+"d=d^(1/3);\n",
+"L=110;\n",
+"J=%pi*d^4/32;\n",
+"T=400;\n",
+"theta=T*10^3*L/(G*J);\n",
+"theta=theta*180/%pi;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm    ',d);\n",
+"  printf('\n theta is %0.4f deg    ',theta);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 15.7: S7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 15-7\n",
+"clc;\n",
+"clear;\n",
+"T=47*10^3;\n",
+"M=32*10^3;\n",
+"d=20;\n",
+"siga=32*M/(%pi*d^3);\n",
+"Tm=16*T/(%pi*d^3);\n",
+"sige=75;\n",
+"Tys=165;\n",
+"n=1/sqrt((siga/sige)^2+(Tm/Tys)^2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('n is %0.2f     ',n);\n",
+"  "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/16-POWER_SCREWS.ipynb b/Machine_Design_by_U_C_Jindal/16-POWER_SCREWS.ipynb
new file mode 100644
index 0000000..0c9c4ff
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/16-POWER_SCREWS.ipynb
@@ -0,0 +1,398 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 16: POWER SCREWS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.1: PS1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-1\n",
+"clc;\n",
+"clear;\n",
+"d=30;\n",
+"W=20*10^3;\n",
+"r1=8;\n",
+"r2=16;\n",
+"p=6;\n",
+"u1=0.2;\n",
+"u2=0.15;\n",
+"dm=d-(p/2);\n",
+"alpha=atan(p/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"rm=(r1+r2)/2;\n",
+"Ttr=W*((dm*tan(alpha+phi)/2)+(u2*rm));\n",
+"Ttr=Ttr*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ttr is %0.3f Nm     ',Ttr);\n",
+"  \n",
+"  //The answer to Ttr is slightly different than in the book due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.2: PS2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-2\n",
+"clc;\n",
+"clear;\n",
+"d=50;\n",
+"W=20*10^3;\n",
+"r1=10;\n",
+"r2=30;\n",
+"p=7;\n",
+"u1=0.12/cosd(15);\n",
+"u2=0.15;\n",
+"dm=d-(p/2);\n",
+"alpha=atan(3*p/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"rm=(r1+r2)/2;\n",
+"Tr=W*((dm*tan(alpha+phi)/2)+(u2*rm));\n",
+"Tr=Tr*10^-3;\n",
+"Te=W*((dm*tan(phi-alpha)/2)+(u2*rm));\n",
+"Te=Te*10^-3;\n",
+"n=dm/2*tan(alpha)/(dm*tan(alpha+phi)/2+(u2*rm));\n",
+"L=0.30;\n",
+"Ph=Tr/L;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tr is %0.2f Nm     ',Tr);\n",
+"  printf('\n Te is %0.3f Nm     ',Te);\n",
+"  printf('\n n is %0.4f      ',n);\n",
+"  printf('\n Ph is %0.2f N     ',Ph);\n",
+"  \n",
+"  //The answers to Tr, Te and Ph is slightly different than in the book due to rounding-off of values.\n",
+"\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.3: PS3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-3\n",
+"clc;\n",
+"clear;\n",
+"d=30;\n",
+"W=5*10^3;\n",
+"p=5;\n",
+"rm=45/2;\n",
+"u1=0.15/cosd(14.5);\n",
+"u2=0.15;\n",
+"dm=d-(p/2);\n",
+"alpha=atan(p/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"Tr1=W*((dm*tan(alpha+phi)/2)+(u2*rm));\n",
+"Tr1=Tr1*10^-3;\n",
+"n1=dm/2*tan(alpha)/(dm*tan(alpha+phi)/2+(u2*rm));\n",
+"T1=W*((dm*tan(phi-alpha)/2)+(u2*rm));\n",
+"T1=T1*10^-3;\n",
+"n2=dm/2*tan(alpha)/(dm*tan(phi-alpha)/2+(u2*rm));\n",
+"u2=0.02;\n",
+"Tr2=W*((dm*tan(alpha+phi)/2)+(u2*rm));\n",
+"Tr2=Tr2*10^-3;\n",
+"n3=dm/2*tan(alpha)/(dm*tan(alpha+phi)/2+(u2*rm));\n",
+"Te=W*((dm*tan(phi-alpha)/2)+(u2*rm));\n",
+"Te=Te*10^-3;\n",
+"n4=dm/2*tan(alpha)/(dm*tan(phi-alpha)/2+(u2*rm));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tr1 is %0.3f Nm     ',Tr1);\n",
+"  printf('\n n1 is %0.4f      ',n1);\n",
+"  printf('\n T1 is %0.3f Nm     ',T1);\n",
+"  printf('\n n2 is %0.4f      ',n2);\n",
+"  printf('\n Tr2 is %0.3f Nm     ',Tr2);\n",
+"  printf('\n n3 is %0.4f      ',n3);\n",
+"  printf('\n Te is %0.3f Nm     ',Te);\n",
+"  printf('\n n4 is %0.4f      ',n4);\n",
+"  \n",
+"  //The answer to T1 is misprinted in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.4: PS4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-4\n",
+"clc;\n",
+"clear;\n",
+"d=28;\n",
+"P=300;\n",
+"L=180;\n",
+"p=8;\n",
+"r1=16;\n",
+"r2=46;\n",
+"rm=(r1+r2)/2;\n",
+"u1=0.12;\n",
+"u2=0.15;\n",
+"dm=d-(p/2);\n",
+"alpha=atan(p/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"T=P*L;\n",
+"F=T/((dm*tan(alpha+phi)/2)+(u2*rm));\n",
+"F=F*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('F is %0.3f kN     ',F);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.5: PS5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-5\n",
+"clc;\n",
+"clear;\n",
+"d=25;\n",
+"p=8;\n",
+"F=392.4;\n",
+"L=250;\n",
+"l=p*2;\n",
+"u=0.14;\n",
+"dm=d-(p/2);\n",
+"alpha=atan(l/(%pi*dm));\n",
+"phi=atan(u);\n",
+"T=dm*tan(alpha+phi)/2;\n",
+"M=F*L;\n",
+"P=M/T*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.1f kN     ',P);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.6: PS6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-6\n",
+"clc;\n",
+"clear;\n",
+"d=52;\n",
+"W=2.2*10^3;\n",
+"p=8;\n",
+"r1=15;\n",
+"r2=30;\n",
+"rm=(r1+r2)/2;\n",
+"u1=0.15/cosd(14.5);\n",
+"dm=d-(p/2);\n",
+"alpha=atan(p/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"Ts=W*dm*tan(alpha+phi)/2;\n",
+"u2=0.12;\n",
+"Tc=u2*W*rm;\n",
+"T=10^-3*(Ts+Tc);\n",
+"N=40;\n",
+"w=2*%pi*N/60;\n",
+"P=T*w*10^-3;\n",
+"To=W*dm/2*tan(alpha);\n",
+"n=To/(T*10^3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.2f KW     ',P);\n",
+"  printf('\n n is %0.4f      ',n);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.7: PS7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-7\n",
+"clc;\n",
+"clear;\n",
+"alpha=atan(2*0.2/(%pi*0.9));\n",
+"u1=0.15;\n",
+"phi=atan(u1);\n",
+"P=200;\n",
+"L=250;\n",
+"Tt=P*L;\n",
+"W=10*10^3;\n",
+"u2=0.15;\n",
+"x=Tt/W;\n",
+"d=x/0.1716;\n",
+"d=30;\n",
+"p=6;\n",
+"dr=0.8*d;\n",
+"d=24;\n",
+"p=5;\n",
+"dr=d-p;\n",
+"dm=d-(p/2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d);\n",
+"  printf('\n p is %0.0f mm     ',p);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 16.8: PS8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 16-8\n",
+"clc;\n",
+"clear;\n",
+"FOS=3;\n",
+"sigut=380;\n",
+"Ta=0.577*sigut/FOS;\n",
+"d=25;\n",
+"Tus=460;\n",
+"Ps=%pi*d*Tus;\n",
+"siga=127;\n",
+"dr=sqrt(Ps*4/(%pi*siga));\n",
+"d=30;\n",
+"p=6;\n",
+"dr=d-p;\n",
+"dm=d-(p/2);\n",
+"u1=0.15;\n",
+"alpha=atan(p*2/(%pi*dm));\n",
+"phi=atan(u1);\n",
+"T=Ps*dm*tan(alpha+phi)/2;\n",
+"T1=16*T/(%pi*dr^3);\n",
+"sigc=4*Ps/(%pi*dr^2);\n",
+"sigmax=sigc/2+sqrt((sigc/2^2)+(T1^2));\n",
+"Tmax=sqrt((sigc/2^2)+(T1^2));\n",
+"n=tan(alpha)/tan(alpha+phi);\n",
+"Uo=Ps/2;\n",
+"Ui=Uo/n;\n",
+"wav=%pi/2;\n",
+"wmax=2*wav;\n",
+"I=Ui*2/wmax^2;\n",
+"k=0.4;\n",
+"Ir=0.9*I*10^-3;\n",
+"m=Ir/k^2;\n",
+"R=0.4;\n",
+"rho=7200;\n",
+"a=sqrt(m/(2*%pi*R*rho));\n",
+"T=T*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T is %0.3f Nm     ',T);\n",
+"  printf('\n n is %0.4f      ',n);\n",
+"  printf('\n a is %0.5f mm      ',a);\n",
+"  \n",
+"  //The difference in the answers of T is due to rounding-off of values.\n",
+"\n",
+""
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/17-SLIDING_CONTACT_BEARINGS.ipynb b/Machine_Design_by_U_C_Jindal/17-SLIDING_CONTACT_BEARINGS.ipynb
new file mode 100644
index 0000000..e732e37
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/17-SLIDING_CONTACT_BEARINGS.ipynb
@@ -0,0 +1,325 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 17: SLIDING CONTACT BEARINGS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.1: SCB1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-1\n",
+"clc;\n",
+"clear;\n",
+"Ta=22;\n",
+"u=7/10^9;\n",
+"nj=20;\n",
+"r=25;\n",
+"l=2*r;\n",
+"Ao=30000;\n",
+"Uo=15.3/10^3;\n",
+"c=0.025;\n",
+"//specific weight of the material is rho\n",
+"rho=8.46*(10^-6);\n",
+"Cp=179.8;\n",
+"Tf=Ta+(16*%pi^3*u*nj^2*l*r^3/(Uo*Ao*c));\n",
+"// avg mean film temperature is Tav\n",
+"Tav=(Tf-Ta)/2;\n",
+"x= l*c*rho*%pi*r*nj*Cp*10^3;\n",
+"y=Ao*Tav*Uo;\n",
+"delT=y/x;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tav is %0.2f degC ',Tav);\n",
+"  printf('\n delT is %0.1f degC ',delT);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.2: SCB2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-2\n",
+"clc;\n",
+"clear;\n",
+"l=60;\n",
+"d=60;\n",
+"r=d/2;\n",
+"ho=0.008;\n",
+"c=0.04;\n",
+"S=0.0446;\n",
+"nj=1260/60;\n",
+"W=6000;\n",
+"p=W/(l*d);\n",
+"u=S*(c/r)^2*p/nj;\n",
+"u=u*10^9;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('u is %0.3f cP ',u);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.3: SCB3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-3\n",
+"clc;\n",
+"clear;\n",
+"d=60;\n",
+"r=30;\n",
+"l=60;\n",
+"c=0.8*10^-3*r;\n",
+"ho=0.2*c;\n",
+"W=21000/2;\n",
+"p=W/(l*d);\n",
+"S=0.0446;\n",
+"nj=1440/60;\n",
+"u=S*(c/r)^2*p/nj;\n",
+"u=u*10^9;\n",
+"// since Q/(r*nj*l)=4.62\n",
+"Q=4.62*r*c*nj*l;\n",
+"Q=Q*60/10^6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('u is %0.3f cP ',u);\n",
+"  printf('\n Q is %0.4f lpm ',Q);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.4: SCB4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-4\n",
+"clc;\n",
+"clear;\n",
+"l=60;\n",
+"d=60;\n",
+"r=d/2;\n",
+"W=3000;\n",
+"p=W/(l*d);\n",
+"u=30*10^-9;\n",
+"c=0.06;\n",
+"nj=1440/60;\n",
+"S=(r/c)^2*u*nj/p;\n",
+"//For ratio l/d=1, values of different parameters are given in matrix A corresponding to S\n",
+"A=[1 0.264 0.6 5.79 3.99\n",
+"   1 0.121 0.4 3.22 4.33];\n",
+"//let ho/c=x\n",
+"x=(A(1,3))-((A(1,3)-(A(2,3)))*((A(1,2))-S)/((A(1,2))-(A(2,2))));\n",
+"//let y= (r/c)*f=CFV\n",
+"y=(A(1,4))-((A(1,4)-(A(2,4)))*((A(1,2))-S)/((A(1,2))-(A(2,2))));\n",
+"//let z=Q/(r*c*nj*l)=FV\n",
+"z=(A(1,5))-((A(1,5)-(A(2,5)))*((A(1,2))-S)/((A(1,2))-(A(2,2))));\n",
+"f=y*c/r;\n",
+"ho=x*c;\n",
+"Q=z*r*c*nj*l;\n",
+"Q=Q*60/10^6;\n",
+"delT=8.3*p*y/z;\n",
+"//let power lost in friction be Pf\n",
+"Pf=2*%pi*nj*f*W*r/10^6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('f is %0.5f  ',f);\n",
+"  printf('\n ho is %0.3f mm ',ho);\n",
+"  printf('\n Q is %0.3f lpm ',Q);\n",
+"  printf('\n delT is %0.1f degC ',delT);\n",
+"  printf('\n Pf is %0.4f KW ',Pf);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.5: SCB5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-5\n",
+"clc;\n",
+"clear;\n",
+"W=22000;\n",
+"nj=960/60;\n",
+"p=2.4;\n",
+"u=20*10^-9;\n",
+"d=sqrt(W/p);\n",
+"d=96;\n",
+"r=d/2;\n",
+"l=d;\n",
+"S=0.0446;\n",
+"pact=W/(l*d);\n",
+"//x=r/c;\n",
+"x=sqrt(S*pact/(u*nj));\n",
+"c=r/x;\n",
+"ho=0.2*c;\n",
+"Q=r*c*nj*l*4.62;\n",
+"Q=Q*60/10^6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm ',d);\n",
+"  printf('\n l is %0.0f mm ',l);\n",
+"  printf('\n ho is %0.4f mm ',ho);\n",
+"  printf('\n Q is %0.3f lpm ',Q);\n",
+"  \n",
+"  //The difference in answer to Q is due to rounding -off the value of c."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.6: SCB6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 17-6\n",
+"clc;\n",
+"clear;\n",
+"W=400*10^3;\n",
+"Ro=200;\n",
+"Ri=160;\n",
+"ho=0.1;\n",
+"t=150;\n",
+"// specific gravity is rho\n",
+"rho=0.86;\n",
+"pi=2*W*log(Ro/Ri)/(%pi*(Ro^2-Ri^2));\n",
+"zk=(0.22*t)-(180/t);\n",
+"z=rho*zk;\n",
+"u=z/(10^9);\n",
+"Q=%pi*pi*ho^3/(6*u*log(Ro/Ri));\n",
+"Q=Q*60/10^6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('pi is %0.3f MPa ',pi);\n",
+"  printf('\n Q is %0.2f lpm ',Q);\n",
+"  \n",
+"  //The difference in answer to Q is due to rounding -off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 17.7: SCB7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//sum 17-7\n",
+"clc;\n",
+"clear;\n",
+"//let number of pads be n\n",
+"n=4;\n",
+"W=100*10^3;\n",
+"Ro=125;\n",
+"Ri=50;\n",
+"t=200;\n",
+"ho=0.15;\n",
+"pi=2*W*log(Ro/Ri)/(%pi*(Ro^2-Ri^2));\n",
+"zk=(0.22*t)-(180/t);\n",
+"// specific gravity is rho\n",
+"rho=0.86;\n",
+"z=rho*zk;\n",
+"u=z/(10^9);\n",
+"Q=%pi*pi*ho^3/(6*u*log(Ro/Ri));\n",
+"Q=Q*60/10^6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('pi is %0.2f MPa ',pi);\n",
+"  printf('\n Q is %0.3f lpm ',Q);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/18-ROLLING_BEARINGS.ipynb b/Machine_Design_by_U_C_Jindal/18-ROLLING_BEARINGS.ipynb
new file mode 100644
index 0000000..8bdc3f0
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/18-ROLLING_BEARINGS.ipynb
@@ -0,0 +1,417 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 18: ROLLING BEARINGS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.10: RB10.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-10\n",
+"clc;\n",
+"clear;\n",
+"Co=695;\n",
+"C=1430;\n",
+"Pa1=200;\n",
+"Pr1=600;\n",
+"x=Pa1/Co;\n",
+"y=Pa1/Pr1;\n",
+"e=0.37+((0.44-0.37)*0.038/0.28);\n",
+"X=1;\n",
+"Y=0;\n",
+"P1=600;\n",
+"Pa2=120;\n",
+"Pr2=300;\n",
+"X=0.56;\n",
+"Y=1.2-(0.2*0.042/0.12);\n",
+"P2=(X*Pr2)+(Y*Pa2);\n",
+"N1=1440;\n",
+"N2=720;\n",
+"t1=2/3;\n",
+"t2=1/3;\n",
+"n1=N1*t1;\n",
+"n2=N2*t2;\n",
+"N=(n1+n2);\n",
+"Pe=(((n1*P1^3)+(n2*P2^3))/N)^(1/3);\n",
+"L=(C/Pe)^3;\n",
+"Lh=L*10^6/(N*60);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Lh is %0.2f hrs    ',Lh);\n",
+"  \n",
+"  //The difference in the value of Lh is due to rounding-off of value of Pe"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.1: RB1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-1\n",
+"clc;\n",
+"clear;\n",
+"Pr=16*10^3;\n",
+"u=0.0011;\n",
+"F=u*Pr;\n",
+"r=20*10^-3;\n",
+"//Let frictional moment be M\n",
+"M=F*r;\n",
+"N=1440;\n",
+"w=2*%pi*N/60;\n",
+"Pf=M*w;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Pf is %0.2f W    ',Pf);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.2: RB2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-2\n",
+"clc;\n",
+"clear;\n",
+"C=5590;\n",
+"Ca=2500;\n",
+"Pa=625;\n",
+"Pr=1250;\n",
+"V=1;\n",
+"X=0.56;\n",
+"Y=1.2;\n",
+"P1=(X*V*Pr)+(Y*Pa);\n",
+"L1=(C/P1)^3;\n",
+"V=1.2;\n",
+"P2=(X*V*Pr)+(Y*Pa);\n",
+"L2=(C/P2)^3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('L1 is %0.1f million revolutions    ',L1);\n",
+"  printf('\n L2 is %0.2f million revoltions    ',L2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.4: RB4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-4\n",
+"clc;\n",
+"clear;\n",
+"P=20*10^3;\n",
+"Co=22400;\n",
+"C=41000;\n",
+"Ln=(C/P)^3;\n",
+"Lh=Ln*10^6/(720*60);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Lh is %0.3f hrs    ',Lh);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.5: RB5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-5\n",
+"clc;\n",
+"clear;\n",
+"R1x=120;\n",
+"R1y=250;\n",
+"R2x=300;\n",
+"R2y=400;\n",
+"Lh=8000;\n",
+"N=720;\n",
+"Ln=Lh*60*N*10^-6;\n",
+"R1=sqrt(R1x^2+R1y^2);\n",
+"R2=sqrt(R2x^2+R2y^2);\n",
+"//Let load factor be Ks\n",
+"Ks=1.5;\n",
+"P1=R1*Ks;\n",
+"P2=R2*Ks;\n",
+"C1=P1*(Ln^(1/3));\n",
+"C2=P2*(Ln^(1/3));\n",
+"//let designation,d,D,B,C at bearing B1 be De1,d1,D1,B1,C1\n",
+"d1=25;\n",
+"D1=37;\n",
+"B1=7;\n",
+"C1=3120;\n",
+"De1=61805;\n",
+"//let designation,d,D,B,C at bearing B2 be De2,d2,D2,B2,C2\n",
+"d2=25;\n",
+"D2=47;\n",
+"B2=8;\n",
+"C2=7620;\n",
+"De2=16005;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Designation of Bearing B1 is %0.0f     ',De1);\n",
+"  printf('\n d1 is %0.0f mm    ',d1);\n",
+"  printf('\n D1 is %0.0f mm    ',D1);\n",
+"  printf('\n B1 is %0.0f mm    ',B1);\n",
+"  printf('\n C1 is %0.0f N    ',C1);\n",
+"  printf('\n Designation of Bearing B2 is %0.0f     ',De2);\n",
+"  printf('\n d2 is %0.0f mm    ',d2);\n",
+"  printf('\n D2 is %0.0f mm    ',D2);\n",
+"  printf('\n B2 is %0.0f mm    ',B2);\n",
+"  printf('\n C2 is %0.0f N    ',C2);\n",
+"  \n",
+"  disp('Bearing 61805 at B1 and 16005 at B2 can be installed.')"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.6: RB6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-6\n",
+"clc;\n",
+"clear;\n",
+"P=7500;\n",
+"N=1440;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"r=0.2;\n",
+"//Let T1-T2=t\n",
+"t=T/r;\n",
+"T2=t/2.5;\n",
+"T1=3.5*T2;\n",
+"R=0.125;\n",
+"Ft=T/R;\n",
+"Fr=Ft*tan(20*%pi/180);\n",
+"// RD & RA are reaction forces calculated in vertical and horizontal directions from FBD by force equilibrium\n",
+"RDv=186.5;\n",
+"RAv=236.2;\n",
+"RDh=36.2;\n",
+"RAh=108.56;\n",
+"RA=sqrt(RAv^2+RAh^2);\n",
+"RD=sqrt(RDv^2+RDh^2);\n",
+"Ks=1.4;\n",
+"P1=RA*Ks;\n",
+"P2=RD*Ks;\n",
+"//let designation,d,D,B,C at bearing B1 be De1,d1,C1\n",
+"d1=25;\n",
+"C1=3120;\n",
+"De1=61805;\n",
+"//let designation,d,D,B,C at bearing B2 be De2,d2,C2\n",
+"d2=25;\n",
+"C2=2700;\n",
+"De2=61804;\n",
+"L1=(C1/P1)^3;\n",
+"Lh1=L1*10^6/(720*60);\n",
+"L2=(C2/P2)^3;\n",
+"Lh2=L2*10^6/(720*60);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Lh1 is %0.0f hrs    ',Lh1);\n",
+"  printf('\n Lh2 is %0.0f hrs    ',Lh2);\n",
+"  \n",
+"  //Incorrect value of P2 is taken in the book while calculating L2."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.7: RB7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-7\n",
+"clc;\n",
+"clear;\n",
+"P=3500;\n",
+"Lh=6000;\n",
+"N=1400;\n",
+"R98=0.98;\n",
+"R90=0.9;\n",
+"L98=Lh*60*N/10^6;\n",
+"x=(log(1/R98)/log(1/R90))^(1/1.17);\n",
+"L90=L98/x;\n",
+"C=P*L90^(1/3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('C is %0.0f N    ',C);\n",
+"  \n",
+"  //The difference in the value of C is due to rounding-off of value of L."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.8: RB8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-8\n",
+"clc;\n",
+"clear;\n",
+"n=3;\n",
+"P=3;\n",
+"//Let Reliability of system be R\n",
+"R=0.83;\n",
+"L94=6;\n",
+"R94=(R)^(1/n);\n",
+"x=(log(1/R94)/log(1/0.90))^(1/1.17);\n",
+"L90=L94/x;\n",
+"C=P*L90^(1/3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('C is %0.3f kN    ',C);\n",
+"  \n",
+"  //The difference in the value of C is due to rounding-off of value of L."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 18.9: RB9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 18-9\n",
+"clc;\n",
+"clear;\n",
+"P1=3000;\n",
+"P2=4000;\n",
+"P3=5000;\n",
+"N1=1440;\n",
+"N2=1080;\n",
+"N3=720;\n",
+"t1=1/4;\n",
+"t2=1/2;\n",
+"t3=1/4;\n",
+"n1=N1*t1;\n",
+"n2=N2*t2;\n",
+"n3=N3*t3;\n",
+"N=(n1+n2+n3);\n",
+"Pe=(((n1*P1^3)+(n2*P2^3)+(n3*P3^3))/N)^(1/3);\n",
+"Lh=10*10^3;\n",
+"L=Lh*60*N/10^6;\n",
+"C=Pe*L^(1/3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('C is %0.0f N    ',C);\n",
+"  \n",
+"  //The difference in the value of C is due to rounding-off of value of Pe"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/19-FLYWHEEL.ipynb b/Machine_Design_by_U_C_Jindal/19-FLYWHEEL.ipynb
new file mode 100644
index 0000000..a74306a
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/19-FLYWHEEL.ipynb
@@ -0,0 +1,341 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 19: FLYWHEEL"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.1: F1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-1\n",
+"clc;\n",
+"clear;\n",
+"R=1200;\n",
+"b=300;\n",
+"t=150;\n",
+"N=500;\n",
+"m=7100*10^-9*b*t;\n",
+"Ar=b*t;\n",
+"Aa=Ar/4;\n",
+"C=(20280/t^2)+0.957+(Ar/Aa);\n",
+"w=2*%pi*N/60;\n",
+"V=w*R*10^-3;\n",
+"siga=2*10^3*m*V^2/(C*Aa*3);\n",
+"theta=30*%pi/180;\n",
+"alpha=30*%pi/180;\n",
+"x1=10^3*m*(V^2)/(b*t);\n",
+"y1=cos(theta)/(3*C*sin(alpha));\n",
+"z1=2000*R*10^-3/(C*t)*((1/alpha)-(cos(theta)/sin(alpha)));\n",
+"sigrr1=x1*(1-y1+z1);\n",
+"theta=0*%pi/180;\n",
+"x2=10^3*m*(V^2)/(b*t);\n",
+"y2=cos(theta)/(3*C*sin(alpha));\n",
+"z2=2000*R*10^-3/(C*t)*((1/alpha)-(cos(theta)/sin(alpha)));\n",
+"sigrr2=x2*(1-y2-z2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('axial stress is %0.2f MPa    ',siga);\n",
+"  printf('\n tensile stress for theta=30deg is %0.1f MPa    ',sigrr1);\n",
+"  printf('\n tensile stress for theta=0deg is %0.2f MPa    ',sigrr2);\n",
+"  \n",
+"  //The difference in the value of sigrr1 and sigrr2 is due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.2: F2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-2\n",
+"clc;\n",
+"clear;\n",
+"N=350;\n",
+"theta1=asin(sqrt((3-0.6)/4));\n",
+"theta1=theta1*180/%pi;\n",
+"theta2=(180)-theta1;\n",
+"//Ti=16000+6000*sind(3*theta);\n",
+"//To=16000+3600*sind(theta);\n",
+"a=-3600*(cosd(theta2)-cosd(theta1));\n",
+"b=2000*(cosd(3*theta2)-cosd(3*theta1));\n",
+"c=a+b;\n",
+"delU=c;\n",
+"Ks=0.05;\n",
+"w=2*%pi*N/60;\n",
+"I=delU/(Ks*w^2);\n",
+"V=25;\n",
+"Ir=I*0.95;\n",
+"R=V/w;\n",
+"Mr=Ir/R^2;\n",
+"rho=7150;\n",
+"t=sqrt(Mr*(10^6)/(2*%pi*R*2*rho));\n",
+"b=2*t;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.2f mm    ',t);\n",
+"  printf('\n b is %0.2f mm    ',b);\n",
+"  printf('\n R is %0.3f m    ',R);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.3: F3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-3\n",
+"clc;\n",
+"clear;\n",
+"N=300;\n",
+"Ks=0.03;\n",
+"rho=7150;\n",
+"Kr=0.9;\n",
+"w=2*%pi*N/60;\n",
+"WD=(300*2*%pi)+(4*%pi*200/4);\n",
+"Tm=400;\n",
+"delU=%pi*200/16;\n",
+"Ir=Kr*delU/(w^2*Ks);\n",
+"R=Ir/(rho*1.5*0.1*0.1*2*%pi);\n",
+"R=R^(1/5);\n",
+"t=0.1*R*1000;\n",
+"b=1.5*t;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.2f mm    ',t);\n",
+"  printf('\n b is %0.2f mm    ',b);\n",
+"  printf('\n R is %0.4f m    ',R);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.4: F4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//sum 19-4\n",
+"clc;\n",
+"clear;\n",
+"d=20;\n",
+"t=12;\n",
+"Tus=450;\n",
+"Pmax=%pi*d*t*Tus;\n",
+"WD=Pmax*t/2*10^-3;\n",
+"n=0.95;\n",
+"Wi=WD/n;\n",
+"delU=5*Wi/6;\n",
+"N=300;\n",
+"w=2*%pi*N/60;\n",
+"Ks=0.2;\n",
+"I=delU/(Ks*w^2);\n",
+"Ir=I*0.9;\n",
+"R=0.5;\n",
+"m=Ir/R^2;\n",
+"rho=7150;\n",
+"t=sqrt(m*10^6/(rho*2*%pi*R*2));\n",
+"b=2*t;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.1f mm    ',t);\n",
+"  printf('\n b is %0.1f mm    ',b);\n",
+"  printf('\n R is %0.1f m    ',R);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.5: F5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-5\n",
+"clc;\n",
+"clear;\n",
+"U=(500*2*%pi)+(3*%pi*500/2);\n",
+"Tm=U/(2*%pi);\n",
+"delU=2.25*%pi*125/2;\n",
+"Ks=0.1;\n",
+"N=250;\n",
+"w=2*%pi*N/60;\n",
+"I=delU/(Ks*w^2);\n",
+"t=0.03;\n",
+"rho=7800;\n",
+"R=(I*2/(%pi*rho*t))^(1/4);\n",
+"V=R*w;\n",
+"v=0.3;\n",
+"sigmax=rho*V^2*(3+v)/8*10^-6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('R is %0.3f m    ',R);\n",
+"  printf('\n sigmax is %0.2f MPa    ',sigmax);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.6: F6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-6\n",
+"clc;\n",
+"clear;\n",
+"N=1.5*8*60;\n",
+"l=200;\n",
+"t=1.5/2;\n",
+"W=350*10^3;\n",
+"WD=0.15*l*W*10^-6;\n",
+"n=0.9; //since frictional effect is 10%, effciency of system is 90%\n",
+"Wi=WD/n;\n",
+"L=400;\n",
+"delU=(L-(0.15*l))/(L)*10^3*Wi;\n",
+"Ks=0.12;\n",
+"w=2*%pi*N/60;\n",
+"I=delU/(Ks*w^2);\n",
+"Ir=I*0.9;\n",
+"R=0.7;\n",
+"m=Ir/R^2;\n",
+"rho=7150;\n",
+"t=sqrt(m*10^6/(rho*2*%pi*R*1.5));\n",
+"b=1.5*t;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.1f mm    ',t);\n",
+"  printf('\n b is %0.1f mm    ',b);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 19.7: F7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 19-7\n",
+"clc;\n",
+"clear;\n",
+"N=144;\n",
+"//Let n be no. of punches/ min\n",
+"n=8;\n",
+"//Let t be timr for 1 punch\n",
+"t=60/n;\n",
+"theta=N/60*2*%pi*0.6;\n",
+"T=2.1;\n",
+"U=T*theta;\n",
+"//Let U1 be revolution of crankshaft in t sec\n",
+"U1=t*N/60*2*%pi;\n",
+"delU=(U1-theta)/U1*U*10^3;\n",
+"w=2*%pi*1440/60;\n",
+"Ks=0.1;\n",
+"I=delU/(Ks*w^2);\n",
+"Ir=I*0.9;\n",
+"rho=7100;\n",
+"\n",
+"R=Ir/(rho*0.2*0.1*2*%pi);\n",
+"R=R^(1/5);\n",
+"t=0.1*R*1000;\n",
+"b=0.2*R*10^3;\n",
+"t=40;\n",
+"b=80;\n",
+"R=400;\n",
+"// printing data in scilab o/p window\n",
+"  printf('t is %0.0f mm    ',t);\n",
+"  printf('\n b is %0.0f mm    ',b);\n",
+"  printf('\n R is %0.0f mm    ',R);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/20-FLAT_BELT_DRIVE.ipynb b/Machine_Design_by_U_C_Jindal/20-FLAT_BELT_DRIVE.ipynb
new file mode 100644
index 0000000..8fe6fcc
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/20-FLAT_BELT_DRIVE.ipynb
@@ -0,0 +1,418 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 20: FLAT BELT DRIVE"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.1: FBD1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-1\n",
+"clc;\n",
+"clear;\n",
+"b=0.2;\n",
+"P=50*10^3;\n",
+"v=20;\n",
+"m=1.95;\n",
+"d=0.3;\n",
+"D=0.9;\n",
+"C=5.8;\n",
+"u=0.4;\n",
+"//Let density be rho\n",
+"rho=1000;\n",
+"E=40;\n",
+"//Let T1-T2 = T\n",
+"T=P/v;\n",
+"//Let the centrifugal tension be Tc\n",
+"Tc=m*v^2;\n",
+"alpha=asind((D+d)/(2*C));\n",
+"theta=180+(2*alpha);\n",
+"theta=theta*%pi/180;\n",
+"x = exp(u*theta);\n",
+"T2=(((1-x)*Tc)-T)/(1-x);\n",
+"//T1=T+T2;\n",
+"T1=T+T2;\n",
+"t=m/(b*rho)*10^3;\n",
+"//Let maximum stress be sigmax\n",
+"b=200;\n",
+"d=300;\n",
+"sigmax=(T1/(b*t)+((E*t)/d));\n",
+"sigmin=(T2/(b*t));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T1 is %0.1f N ',T1);\n",
+"  printf('\n T2 is %0.1f N ',T2);\n",
+"  printf('\n t is %0.2f mm ',t)\n",
+"  printf('\n theta is %0.2f rad ',theta)\n",
+"  printf('\n sigmax is %0.2f N/mm^2 ',sigmax);\n",
+"  printf('\n sigmin is %0.3f N/mm^2 ',sigmin);\n",
+"  \n",
+"  //The answer for T1 is miscalculated in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.2: FBD2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-2\n",
+"clc;\n",
+"clear;\n",
+"P=12*10^3;\n",
+"d=0.2;\n",
+"D=0.5;\n",
+"C=2;\n",
+"sigmax=2*10^6;\n",
+"t=8*10^-3;\n",
+"//Let density be rho\n",
+"rho=950;\n",
+"u=0.38;\n",
+"N=1500;\n",
+"//Let angle of contact = thetad\n",
+"thetad=180-(2*asind((D-d)/(2*C)));\n",
+"thetad=thetad*%pi/180;\n",
+"thetaD=(2*%pi)-thetad;\n",
+"v=(2*%pi*N*d)/(60*2);\n",
+"//Let T1-T2=T\n",
+"T=P/v;\n",
+"x=exp(u*thetad);\n",
+"b=(T*x)/((1-x)*t*((rho*v^2)-(sigmax)));\n",
+"b=b*10^3;\n",
+"//Let breadth of the pulley be b1\n",
+"b1=b*10^3+13; //Table 20-3\n",
+"L=sqrt((4*C^2)-(C*(D-d)^2))+((D*thetaD)+(d*thetad))/2;\n",
+"// Let pulley crown for d=h1, D=h2\n",
+"h1=0.6;  //Table 20-4\n",
+"h2=1;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('b is %0.2f mm ',b)\n",
+"  printf('\n L is %0.2f m ',L)\n",
+"  printf('\n b1 is %0.2f mm ',b1);\n",
+"  printf('\n h1 is %0.1f mm ',h1);\n",
+"  printf('\n h2 is %0.1f mm ',h2);\n",
+" "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.3: FBD3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-3\n",
+"clc;\n",
+"clear;\n",
+"P=11;\n",
+"N=1440;\n",
+"n=480;\n",
+"C=2.4;\n",
+"//Let power transmitte dfrom high speed belt =P1\n",
+"P1=0.0118;\n",
+"V=5;\n",
+"Ks=1.2;\n",
+"v=15;\n",
+"d=v*10^3*60/(2*%pi*N);\n",
+"d=0.2;\n",
+"D=N/n*d;\n",
+"//Let angle of contact =thetaA\n",
+"thetaA=180-(2*asind((D-d)/(2*C)));\n",
+"thetaA=thetaA*%pi/180;\n",
+"v=(2*%pi*N*d)/(60*2);\n",
+"//Let the arc of contact correction factor be Ka\n",
+"Ka=1.05;\n",
+"Pd=P*Ka*Ks;\n",
+"//Let corrected load rating=Pc\n",
+"Pc=P1*v/V;\n",
+"b=Pd/(Pc*4);\n",
+"thetaB=(2*%pi)-thetaA;\n",
+"L=sqrt((4*C^2)-((D-d)^2))+((d*thetaA/2)+(D*thetaB)/2);\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('v is %0.2f m/s ',v)\n",
+"  printf('\n b is %0.3f mm ',b)\n",
+"  printf('\n L is %0.4f m ',L);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.4: FBD4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-4\n",
+"clc;\n",
+"clear;\n",
+"N=1440;\n",
+"i=2.5;\n",
+"C=3600;\n",
+"//let load factor be LF\n",
+"LF=1.3;\n",
+"P=12*10^3;\n",
+"n=N/i;\n",
+"V=16;\n",
+"d=V*10^3*60/(2*%pi*N);\n",
+"d=220;\n",
+"D=d*i;\n",
+"V=2*%pi*N*d/(2*60*1000);\n",
+"v=5;\n",
+"//Let power transmitte dfrom high speed belt =P1\n",
+"P1=0.0118;\n",
+"//Let LR be the load rating of belt\n",
+"LR=P1/v*V;\n",
+"theta=180+(2*asind((D-d)/(2*C)));\n",
+"theta=theta*%pi/180;\n",
+"//Let Arc of contact connection factor be CF\n",
+"CF=1-(0.03/2);\n",
+"Pd=P*LF*CF;\n",
+"b=Pd/(LR*5);\n",
+"b=80;\n",
+"L=sqrt((4*C^2)-(D+d)^2)+(theta*(D+d)/2);\n",
+"L=L*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('V is %0.1f m/s ',V)\n",
+"  printf('\n b is %0.0f mm ',b)\n",
+"  printf('\n L is %0.3f m ',L);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.5: FBD5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-5\n",
+"clc;\n",
+"clear;\n",
+"i=3.6;\n",
+"N=1440;\n",
+"d=220;\n",
+"Ks=1.2;\n",
+"Kf=1.1;\n",
+"C=5000;\n",
+"u=0.8;\n",
+"D=i*d;\n",
+"//From table 20-7, the following data is available\n",
+"t=5;\n",
+"b=120;\n",
+"Fa=30.64;\n",
+"//let weight density be w\n",
+"w=0.106*10^5;\n",
+"Cp=0.71; //From table 20-6\n",
+"Cv=1;\n",
+"T1=Fa*b*t*Cp*Cv;\n",
+"m=w*b*t/10^6;\n",
+"V=2*%pi*N*d/(2*60*1000);\n",
+"Tc=m*V^2/9.81;\n",
+"theta=180+(2*asind((D-d)/(2*C)));\n",
+"theta=theta*%pi/180;\n",
+"x=u*theta;\n",
+"T2=Tc+((T1-Tc)/exp(x));\n",
+"Pd=(T1-T2)*V*10^-3;\n",
+"P=Pd/(Ks*Kf);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('V is %0.2f m/s ',V);\n",
+"  printf('\n Pd is %0.2f KW ',Pd);\n",
+"  printf('\n P is %0.1f KW ',P);\n",
+"  \n",
+"  //The value of T2 is calculated incorrectly, therefore there is a difference in the values of Pd and P."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.6: FBD6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-6\n",
+"clc;\n",
+"clear;\n",
+"i=2.5;\n",
+"C=4500;\n",
+"N=960;\n",
+"P=20*10^3;\n",
+"Ks=1.15;\n",
+"Kf=1.10;\n",
+"t=8;\n",
+"//let weight density be w\n",
+"w=0.110*10^5;\n",
+"m=w*t/10^6;\n",
+"Fa=8.75;\n",
+"d=200;\n",
+"D=i*d;\n",
+"u=0.4;\n",
+"V=2*%pi*N*d/(2*60*1000);\n",
+"Pd=P*Ks*Kf;\n",
+"Cp=1;\n",
+"Cv=0.6;\n",
+"//to find b\n",
+"T1=Fa*t*Cp*Cv;\n",
+"Tc=m*V^2/9.81;\n",
+"theta=180-(2*asind((D-d)/(2*C)));\n",
+"theta=theta*%pi/180;\n",
+"x=u*theta;\n",
+"T2=Tc+((T1-Tc)/exp(x));\n",
+"T=Pd/V;\n",
+"b=T/(T1-T2);\n",
+"//b=90;\n",
+"L=sqrt((4*C^2)-(D+d)^2)+(theta*(D+d)/2);\n",
+"L=L*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('V is %0.2f m/s ',V)\n",
+"  printf('\n b is %0.3f mm ',b)\n",
+"  printf('\n L is %0.3f m ',L);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 20.7: FBD7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 20-7\n",
+"clc;\n",
+"clear;\n",
+"b=160;\n",
+"t=7;\n",
+"P=3*10^3;\n",
+"Ks=1.2;\n",
+"d=160;\n",
+"N=1440;\n",
+"D=480;\n",
+"C=2400;\n",
+"w=11200;\n",
+"u=0.4;\n",
+"Fa=7.2;\n",
+"m=w*b*t/10^6;\n",
+"V=2*%pi*N*d/(2*60*1000);\n",
+"Tc=m*V^2/9.81;\n",
+"Cp=0.6; //from table 20-6\n",
+"Cv=0.98; //from table 20-7\n",
+"Ta=Fa*b*Cp*Cv;\n",
+"T=P/V;\n",
+"theta=180-(2*asind((D-d)/(2*C)));\n",
+"theta=theta*%pi/180;\n",
+"x=u*theta;\n",
+"//T2=Tc+((T1-Tc)/exp(x));\n",
+"T2=(T+((exp(x)*Tc)-Tc))/(exp(x)-1);\n",
+"T1=T+T2;\n",
+"Kf=Ta/T1;\n",
+"Pd=P*Ks*Kf;\n",
+"Pd=Pd*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tc is %0.0f N ',Tc);\n",
+"  printf('\n T1 is %0.2f N ',T1);\n",
+"  printf('\n T2 is %0.2f N ',T2);\n",
+"  printf('\n Kf is %0.2f  ',Kf);\n",
+"  printf('\n Pd is %0.1f KW ',Pd);\n",
+"  \n",
+"  //The difference in values of T1 and T2 is due to rounding-off of values.\n",
+" "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/21-V_BELT_DRIVE.ipynb b/Machine_Design_by_U_C_Jindal/21-V_BELT_DRIVE.ipynb
new file mode 100644
index 0000000..09e17e6
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/21-V_BELT_DRIVE.ipynb
@@ -0,0 +1,305 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 21: V BELT DRIVE"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 21.1: VBELT1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 21-1\n",
+"clc;\n",
+"clear;\n",
+"P1=12*10^3;\n",
+"d=0.3;\n",
+"D=0.9;\n",
+"C=0.9;\n",
+"A=230*10^-6;\n",
+"//density is rho\n",
+"rho=1100;\n",
+"N=1500;\n",
+"//Maximum stress is sig\n",
+"sig=2.1*10^6;\n",
+"//semi groove angle is b\n",
+"b=20*%pi/180;\n",
+"u=0.22;\n",
+"m=rho*A;\n",
+"v=2*%pi*N*d/(60*2);\n",
+"Tc=m*v^2;\n",
+"T1=A*sig;\n",
+"//wrap angle is thetaA\n",
+"ang=(D-d)/(2*C);\n",
+"thetaA=%pi/180*(180-(2*asind(ang)));\n",
+"thetaB=((2*%pi)-thetaA);\n",
+"x=u*thetaB;\n",
+"T2=Tc+((T1-Tc)/exp(x));\n",
+"P2=(T1-T2)*v;\n",
+"n=P1/P2;\n",
+"n=3; //(rounding off to nearest whole number)\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tc is %0.1f N ',Tc);\n",
+"  printf('\n T1 is %0.0f N ',T1);\n",
+"  printf('\n T2 is %0.1f N ',T2);\n",
+"  printf('\n P2 is %0.0f W ',P2);\n",
+"  printf('\n n is %0.0f ',n);\n",
+"  \n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 21.2: VBELT2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 21-2\n",
+"clc;\n",
+"clear;\n",
+"D=0.6;\n",
+"d=0.3;\n",
+"C=0.9;\n",
+"m=0.193;\n",
+"n=2;\n",
+"N=1500;\n",
+"u=0.3;\n",
+"v=2*%pi*N/60*d/2;\n",
+"P=150*10^3;\n",
+"Tc=m*v^2;\n",
+"//let T1-T2=T\n",
+"T=P/(n*v);\n",
+"thetaA=%pi/180*(180-(2*asind((D-d)/(2*C))));\n",
+"thetaB=((2*%pi)-thetaA);\n",
+"//Groove angle=b\n",
+"b=17.5*%pi/180;\n",
+"x=u*thetaA/sin(b);\n",
+"y=exp(x);\n",
+"c=(Tc*(1-y));\n",
+"T2=(T+(Tc*(1-y)))/(y-1);\n",
+"//T2=(T-y)/Tc;\n",
+"T1=T+Tc;\n",
+"Lp=2*sqrt((C^2)-((D-d)/2)^2)+(thetaA*d/2)+(thetaB*D/2);\n",
+"v=sqrt(T/(3*m));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tc is %0.2f N ',Tc);\n",
+"  printf('\n T1 is %0.0f N ',T1);\n",
+"  printf('\n T2 is %0.2f N ',T2);\n",
+"  printf('\n Lp is %0.3f m ',Lp);\n",
+"  printf('\n v is %0.2f m/s ',v);\n",
+"  printf('\nThe designation of the belt is B-3251-45 ');\n",
+"  \n",
+"  //The difference in values of T1 and T2 is due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 21.3: VBELT3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 21-3\n",
+"clc;\n",
+"clear;\n",
+"C=1;\n",
+"m=0.35;\n",
+"d=0.25;\n",
+"P=22*10^3;\n",
+"//Let the smaller pulley dia be n\n",
+"//Let the larger pulley dia be N\n",
+"n=1000;\n",
+"N=400;\n",
+"D=d*n/N;\n",
+"v=2*%pi*n*d/(60*2);\n",
+"Tc=m*v^2;\n",
+"topwidth=22;\n",
+"h=14;\n",
+"bottomwidth=topwidth-(2*h*tand(20));\n",
+"A=(topwidth+bottomwidth)/2*h;\n",
+"//let allowable tension be Ta\n",
+"Ta=2.2;\n",
+"T1=A*Ta;\n",
+"u=0.28;\n",
+"thetaA=%pi/180*(180-(2*asind((D-d)/(2*C))));\n",
+"thetaB=((2*%pi)-thetaA);\n",
+"//Groove angle=b=19\n",
+"b=19*%pi/180;\n",
+"x=u*thetaA/sin(b);\n",
+"T2=Tc+((T1-Tc)/exp(x));\n",
+"n=P/((T1-T2)*v);\n",
+"Lp=2*sqrt((C^2)-((D-d)/2)^2)+(thetaA*d/2)+(thetaB*D/2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tc is %0.2f N ',Tc);\n",
+"  printf('\n T1 is %0.1f N ',T1);\n",
+"  printf('\n T2 is %0.1f N ',T2);\n",
+"  printf('\n n is %0.1f ',n);\n",
+"  printf('\n Lp is %0.3f m ',Lp);\n",
+"  printf('\nThe designation of the belt is C-3414-47 ');\n",
+"  \n",
+" // difference in value of Lp is due to rounding-off the values of thetaA and thetaB."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 21.4: VBELT4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 21-4\n",
+"clc;\n",
+"clear;\n",
+"P=12*10^3;\n",
+"Ks=1.1;\n",
+"Pd=12*10^3*Ks;\n",
+"N=1440;\n",
+"B=17;\n",
+"t=11;\n",
+"d=200;\n",
+"i=3;\n",
+"D=i*d;\n",
+"C=1000;\n",
+"// since angle of contact theta is very small\n",
+"theta=(D-d)/C;\n",
+"theta=theta*180/%pi;\n",
+"Kc=0.8;\n",
+"Lp=(2*C)+(%pi/2*(D+d))+(((D-d)^2)/(4*C));\n",
+"Li=Lp-45;\n",
+"Ki=1.1;\n",
+"//let number of v-belts required = n\n",
+"//let the KW rating be KWR\n",
+"KWR=5.23;\n",
+"n=(P*Ks)/(KWR*Ks*Ki*10^3);\n",
+"n=3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('D is %0.1f mm ',D);\n",
+"  printf('\n C is %0.1f mm ',C);\n",
+"  printf('\n n is %0.3f ',n);\n",
+"  printf('\n Li is %0.0f mm ',Li)"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 21.5: VBELT5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 21-5\n",
+"clc;\n",
+"clear;\n",
+"N=800;\n",
+"P=20;\n",
+"i=2.5;\n",
+"Ks=1.5; //(from table for 3-5 hrs/day)\n",
+"Pd=P*Ks;\n",
+"d=250;\n",
+"D=i*d;\n",
+"C=1.6*D;\n",
+"Lp=(2*C)+(%pi*(D+d)/2)+((D-d)^2)/(4*C);\n",
+"Li=Lp+74;\n",
+"Listd=3454;\n",
+"Lp=Listd+74;\n",
+"p=[1 -1.0768 0.0175];\n",
+"\n",
+"function r= myroots (p)\n",
+"    \n",
+"a= coeff (p ,0);\n",
+"b= coeff (p ,1);\n",
+"c= coeff (p ,2);\n",
+"r(1)=( -b+ sqrt (b^2 -4*a*c ))/(2* a);\n",
+"r(2)=( -b- sqrt (b^2 -4*a*c ))/(2* a);\n",
+"endfunction\n",
+"z=roots(p);\n",
+"KW=9.4;\n",
+"Kc=0.795;\n",
+"K1=1;\n",
+"n=Pd/(KW*Kc*K1);\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('C is %0.4f m ',z);\n",
+"  printf('\n Pd is %0.0f KW ',Pd);\n",
+"  printf('\n n is %0.2f KW ',n);\n",
+"  \n",
+"  "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/22-FRICTION_CLUTCHES.ipynb b/Machine_Design_by_U_C_Jindal/22-FRICTION_CLUTCHES.ipynb
new file mode 100644
index 0000000..fc59fac
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/22-FRICTION_CLUTCHES.ipynb
@@ -0,0 +1,486 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 22: FRICTION CLUTCHES"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.10: FC2210.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-10\n",
+"clc;\n",
+"clear;\n",
+"w2=2*%pi*1400/60;\n",
+"w1=0.8*w2;\n",
+"P=40*10^3;\n",
+"T=P/w2;\n",
+"n=4;\n",
+"T1=T/4;\n",
+"R=0.16;//Inner radius of drum\n",
+"r=0.13;//radial distance of each shoe from axis of rotation\n",
+"u=0.22;//coefficient of friction\n",
+"x=u*r*R*((w2^2)-(w1^2))\n",
+"m =T1/x;\n",
+"l=R*%pi/3;\n",
+"N=T1/(R*u);\n",
+"p=1*10^5;\n",
+"b=N/(p*l)*10^3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe full speed is %0.1f rad/sec',w2);\n",
+"printf('\nThe engagement speed is %0.2f rad/sec',w1);\n",
+"printf('\nThe number of shoes is %0.0f ',n);\n",
+"printf('\nThe Torque is %0.1f Nm',T);\n",
+"printf('\nThe Torque per shoe is %0.1f Nm',T1);\n",
+"printf('\nThe mass per shoe is %0.2f kg',m);\n",
+"printf('\nThe length of friction lining is %0.5f m',l);\n",
+"printf('\nThe width is %0.1f mm',b);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.1: FC221.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-1\n",
+"clc;\n",
+"clear;\n",
+"u=0.28 //(coefficient of friction)\n",
+"N=300 //(Engine rpm)\n",
+"I=7.2 \n",
+"Pmax= 0.1; \n",
+"R1=70;\n",
+"R2=110;\n",
+"n=2; //(Both sides of the plate are effective)\n",
+"//Using Uniform Wear Theory\n",
+"//Axial Force W\n",
+"W=n*%pi*Pmax*R1*(R2-R1);\n",
+"//Frictional Torque Tf\n",
+"Tf=u*W*(R1+R2)/2*(10^-3);\n",
+"w=2*%pi*N/60;\n",
+"//Power P\n",
+"P=Tf*w;\n",
+"//Torque = Mass moment of inertia*angular acceleration\n",
+"a=Tf/I;\n",
+"t=w/a; \n",
+"//Angle turned by driving shaft theta1 through which slipping takes place\n",
+"theta1=w*t;\n",
+"//angle turned by driven shaft theta2\n",
+"theta2=a*(t^2)/2;\n",
+"E=Tf*(theta1-theta2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe force is %0.1f N',W);\n",
+"printf('\nThe Torque is %0.2f Nm',Tf);\n",
+"printf('\nThe Power is %0.0f W',P);\n",
+"printf('\nThe angular acceleration is %0.2f rad/sec^2',a);\n",
+"printf('\nThe time taken is %0.1f sec',t);\n",
+"printf('\nThe energy is %0.2f Nm',E);\n",
+"\n",
+"//The difference in the answer of energy 'E' is due to rounding-off of values.\n",
+"\n",
+"\n",
+"\n",
+"\n",
+"\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.2: FC222.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-2\n",
+"clc;\n",
+"clear;\n",
+"//Power P\n",
+"P=80*10^3; //(Watt)\n",
+"N=3000; //(Engine rpm)\n",
+"w=2*%pi*3*10^3/60\n",
+"Tf=8*10^4/w;\n",
+"Rm=100;//(mm)\n",
+"p=0.2 //N/mm^2\n",
+"u=0.22 \n",
+"// let width b= (R1-R2). \n",
+"//Axial force W=2*pi*Rm*b*p\n",
+"//Torque T=u*W*Rm\n",
+"b=Tf/(u*2*%pi*(Rm^2)*p);\n",
+"b=50; \n",
+"R2=Rm+b;\n",
+"R1=Rm-b;\n",
+"Di=2*R1; //inner diameter\n",
+"W=2*%pi*Rm*b*p;\n",
+"n=8; //n is number of springs\n",
+"//Axial force per spring W1\n",
+"W1=W/n;\n",
+"W1=W1+15;\n",
+"//axial deflection del\n",
+"del=10; \n",
+"//stiffness k\n",
+"k=W1/del;\n",
+"// Spring index C\n",
+"C=6;\n",
+"//number of coils n1\n",
+"n1=6; //Assumption\n",
+"d=k*n*n1*(C^3)/(80*10^3);\n",
+"d=11; // Rounding off to nearest standard value\n",
+"D=C*d;\n",
+"clearance=2;\n",
+"FL=((n1+2)*d)+(2*del)+clearance; // two end coils, therefore (2*del)\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"\n",
+"printf('\nThe Torque is %0.2f Nm',Tf);\n",
+"printf('\nThe width is %0.0f mm',b);\n",
+"printf('\nThe force is %0.0f N',W);\n",
+"printf('\nThe Axial force per spring is %0.0f N',W1);\n",
+"printf('\nThe Spring stiffness is %0.0f N/mm',k);\n",
+"printf('\nThe Spring wire diameter is %0.0f mm',d);\n",
+"printf('\nThe Mean coil diameter is %0.0f mm',D);\n",
+"printf('\nThe Free length is %0.0f mm',FL);\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.3: FC223.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-3\n",
+"clc;\n",
+"clear;\n",
+"//Power P\n",
+"P=40*10^3 //Watt\n",
+"n1=100; //rpm\n",
+"n2=400; //rpm\n",
+"//Speed factor Ks\n",
+"Ks=0.9+0.001*n2;\n",
+"//Clutch power Pc\n",
+"Pc=P*n2/(n1*Ks)*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe Speed factor is %0.1f ',Ks);\n",
+"printf('\nThe clutch poweris %0.0f KW',Pc);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.4: FC224.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//22-4\n",
+"clc;\n",
+"clear;\n",
+"// plot Torque vs Ro/Ri\n",
+"//x=Ro/Ri\n",
+"//According to Uniform Wear theory\n",
+"x=[0 0.2 0.4 0.577 0.6 0.8 1.0];\n",
+"n=length(x);\n",
+"for i=1:n\n",
+"    Tf(i)=(x(i)-(x(i)^3));\n",
+"end\n",
+"plot (x,Tf);\n",
+"xtitle('','Ro/Ri');\n",
+"ylabel('Tf');\n",
+"xgrid(2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.5: FC225.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-5\n",
+"clc;\n",
+"clear;\n",
+"n1=4;\n",
+"n2=3;\n",
+"n=(n1+n2-1);\n",
+"R2=80;\n",
+"R1=50;\n",
+"//According to Uniform Pressure Theory\n",
+"//W=p*pi*((R2^2)-(R1^2)) T=n*2*u*W*((R2^3)-(R1^3))/(((R2^2)-(R1^2))*3)\n",
+"P=15*10^3;\n",
+"N=1400;\n",
+"u=0.25;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"W=T*3*((R2^2)-(R1^2))/(n*2*u*((R2^3)-(R1^3)))*10^3;\n",
+"p=W/(%pi*((R2^2)-(R1^2)));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe angular speed is %0.2f rad/sec',w);\n",
+"printf('\nThe Torque is %0.3f Nm',T);\n",
+"printf('\nThe uniform pressure is %0.3f N/mm^2',p);\n",
+"printf('\nThe Force is %0.1f N',W);\n",
+"\n",
+"\n",
+"\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.6: FC226.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//FRICTION CLUTCHES\n",
+"// PAGE 584, 22-6\n",
+"clc;\n",
+"P=5*10^3;\n",
+"N=1000;\n",
+"w=2*%pi*N/60;\n",
+"Rm=50;\n",
+"pm=0.3;\n",
+"Tf=P/w;\n",
+"u=0.1;\n",
+"R2=50*2/(0.6+1);\n",
+"R1=0.6*R2;\n",
+"//According to uniform Wear theory\n",
+"W=pm*Rm*(R2-R1)*2*%pi;\n",
+"n=Tf*(10^3)/(u*W*Rm);\n",
+"pmax=pm*Rm/R1;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe angular speed is %0.2f rad/sec',w);\n",
+"printf('\nThe Torque is %0.3f Nm',Tf);\n",
+"printf('\nThe Inner radius is %0.1f mm',R1);\n",
+"printf('\nThe Outer radius is %0.1f mm',R2);\n",
+"printf('\nThe number of contacting surfaces is %0.0f ',n);\n",
+"printf('\nThe max. pressure is %0.1f N/mm^2',pmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.7: FC227.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-7\n",
+"clc;\n",
+"clear;\n",
+"P=12*10^3;\n",
+"N=750 //Speed=N\n",
+"w=2*%pi*N/60;\n",
+"Tf=P/w;\n",
+"p1=0.12;\n",
+"a=12.5;//Semi-cone angle\n",
+"u=0.3;\n",
+"k=u*0.18246*1.121/0.21644;\n",
+"R1=(Tf*(10^3)/k)^(1/3);\n",
+"R2=R1*1.242;\n",
+"Rm=1.121*R1;\n",
+"W=2*%pi*p1*R1*(R2-R1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe angular speed is %0.2f rad/sec',w);\n",
+"printf('\nThe Torque is %0.1f Nm',Tf);\n",
+"printf('\nThe Inner radius is %0.1f mm',R1);\n",
+"printf('\nThe Outer radius is %0.1f mm',R2);\n",
+"printf('\nThe mean radius is %0.2f mm',Rm);\n",
+"printf('\nThe axial force is %0.0f N',W);\n",
+"\n",
+"//The difference in the answer is due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.8: FC228.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//22-8\n",
+"clc;\n",
+"clear;\n",
+"//semi-cone angle is given as 15 degree\n",
+"k=sin(15*%pi/180);\n",
+"u=0.3;\n",
+"W=300;\n",
+"Rm=90/2;\n",
+"Tf=u*W*Rm/k;\n",
+"Tf=Tf*(10^-3);\n",
+"I=0.4;\n",
+"a=Tf/I;\n",
+"N=1440;\n",
+"w=2*%pi*N/60;\n",
+"t=w/a;\n",
+"//During Slipping\n",
+"theta1=w*t;\n",
+"theta2=theta1/2;\n",
+"U=Tf*(theta1-theta2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe Torque is %0.3f Nm',Tf);\n",
+"printf('\nThe angular acceleration is %0.3f rad/sec^2',a);\n",
+"printf('\nThe angular speed is %0.1f rad/sec',w);\n",
+"printf('\nThe time taken is %0.2f sec',t);\n",
+"printf('\nThe Energy lost in friction is %0.0f Nm',U);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 22.9: FC229.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// 22-9\n",
+"clc;\n",
+"clear;\n",
+"P=15*10^3;\n",
+"Ka=1.25;\n",
+"N=1500;\n",
+"w=2*%pi*N/60;\n",
+"Tf=P/w;\n",
+"d=(Tf*16/(50*%pi))^(1/3);\n",
+"d=25;\n",
+"Rm=5*d;\n",
+"Pav=0.12;\n",
+"u=0.22;\n",
+"b=Tf/(%pi*u*Pav*(Rm^2));\n",
+"b=40;\n",
+"R1=Rm-(b*sin(15*%pi/180)/2);\n",
+"R2=Rm+(b*sin(15*%pi/180)/2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('\nThe Torque is %0.2f Nm',Tf);\n",
+"printf('\nThe shaft diameter is %0.0f mm',d);\n",
+"printf('\nThe width is %0.0f mm',b);\n",
+"printf('\nThe Inner radius is %0.1f mm',R1);\n",
+"printf('\nThe Outer radius is %0.1f mm',R2);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/23-BRAKES.ipynb b/Machine_Design_by_U_C_Jindal/23-BRAKES.ipynb
new file mode 100644
index 0000000..6140bdc
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/23-BRAKES.ipynb
@@ -0,0 +1,371 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 23: BRAKES"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.1: B23_1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-1\n",
+"clc;\n",
+"clear;\n",
+"W=20e3;\n",
+"m=W/9.81;\n",
+"//diameter of brake drum\n",
+"Db=0.6;\n",
+"p=1;\n",
+"Vi=1;\n",
+"Vf=0;\n",
+"D=1;\n",
+"R=0.5;\n",
+"wi=Vi/R;\n",
+"wf=0;\n",
+"w=1;\n",
+"Vav=0.5;\n",
+"S=2;\n",
+"t=S/Vav;\n",
+"//angle turned by by hoist drum=theta\n",
+"theta=0.5*wi*t;\n",
+"K.E=0.5*m*Vi^2;\n",
+"P.E=2*W;\n",
+"T.E=K.E+P.E;\n",
+"T=T.E/theta;\n",
+"P=wi*T*10^-3;\n",
+"Rb=Db/2;\n",
+"Ft=0.5*T*p/Rb;\n",
+"u=0.35;\n",
+"N=Ft/u;\n",
+"//contact area of brake lining=A\n",
+"A=N/p;\n",
+"b=0.3*Db;\n",
+"L=A*10^-6/(b);\n",
+"//angle subtended at brake drum centre=theta2\n",
+"theta2=2*(asin(L/Db));\n",
+"theta2=theta2*180/%pi; // converting radian to degree\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T is %0.1f Nm ',T);\n",
+"  printf('\n P is %0.4f kW ',P);\n",
+"  printf('\n b is %0.2f m ',b);\n",
+"  printf('\n L is %0.3f m ',L);\n",
+"  printf('\n theta2 is %0.0f deg ',theta2);\n",
+" \n",
+"\n",
+"\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.2: B23_2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-2\n",
+"clc;\n",
+"clear;\n",
+"b=80;\n",
+"t=2;\n",
+"theta=225*%pi/180;\n",
+"u=0.22;\n",
+"//F1/F2=e^(u*theta)\n",
+"//let F1/F2=x;\n",
+"x=exp(u*theta);\n",
+"//maximum tensile stress in steel tape is siga\n",
+"siga=60;\n",
+"A=b*t;\n",
+"F1=siga*A;\n",
+"F2=F1/x;\n",
+"r=0.2;\n",
+"T=(F1-F2)*r;\n",
+"OA=30;\n",
+"OB=100;\n",
+"OC=350;\n",
+"P=((F2*OB)+(F1*OA))/OC;\n",
+"OA=F2*OB/F1;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('F1 is %0.0f N ',F1);\n",
+"  printf('\n F2 is %0.1f N ',F2);\n",
+"  printf('\n T is %0.2f Nm ',T);\n",
+"  printf('\n OA is %0.2f mm ',OA);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.3: B23_3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-3\n",
+"clc;\n",
+"clear;\n",
+"theta=%pi/3;\n",
+"r=160;\n",
+"u=0.3;\n",
+"pmax=0.9;\n",
+"b=40;\n",
+"R=(4*r*sin(theta))/((2*theta)+sin(2*theta));\n",
+"//frictional torque is T\n",
+"T=2*u*pmax*b*(r^2)*sin(theta);\n",
+"T=2*T*10^-3;\n",
+"Rx=0.5*pmax*b*r*((2*theta)+(sin(2*theta)))*10^-3;\n",
+"Ry=u*Rx;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T is %0.2f Nmm ',T);\n",
+"  printf('\n R is %0.3f mm ',R);\n",
+"  printf('\n Rx is %0.3f kN ',Rx);\n",
+"  printf('\n Ry is %0.2f kN ',Ry);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.4: B23_4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-4\n",
+"clc;\n",
+"clear;\n",
+"d=320;\n",
+"r=d/2;\n",
+"b=50;\n",
+"u=0.3;\n",
+"pmax=1;\n",
+"c=115*2;\n",
+"// From to fig. 23-9, distance OA=R is calculated.\n",
+"R=sqrt(115^2+66.4^2);\n",
+"C=115*2;\n",
+"theta1=0;\n",
+"theta2=120*%pi/180;\n",
+"theta0=120*%pi/180;\n",
+"thetamax=%pi/2;\n",
+"Tr=u*pmax*b*r^2*(cos(theta1)-cos(theta2))/sin(thetamax)*10^-3;\n",
+"//the notation 'r' is used for moments of right hand shoe, similarly 'l' for the left shoe.\n",
+"Mfr=u*pmax*b*r*(4*r*(cos(theta1)-cos(theta2))+(R*(cos(2*theta1)-cos(2*theta2))))/(4*sin(thetamax))*10^-3;\n",
+"Mpr=pmax*b*r*R*((2*theta0)-(sin(2*theta2)-(sin(theta1))))/(4*sin(thetamax))*10^-3;\n",
+"F=(Mpr-Mfr)/c*10^3;\n",
+"//Mpl+Mfl=F*c;\n",
+"x=F*c*10^-3;\n",
+"y=(Mpr/pmax)+(Mfr/pmax);\n",
+"pmax2=x/y;\n",
+"Tl=pmax2*Tr;\n",
+"Mpl=pmax2*Mpr;\n",
+"Mfl=pmax2*Mfr;\n",
+"T=Tl+Tr;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tr is %0.0f Nm ',Tr);\n",
+"  printf('\n Mf is %0.2f Nm ',Mfr);\n",
+"  printf('\n Mp is %0.2f Nm ',Mpr);\n",
+"  printf('\n Tl is %0.1f Nm ',Tl); \n",
+"  printf('\n Mfl is %0.2f Nm ',Mfl);\n",
+"  printf('\n Mpl is %0.2f Nm ',Mpl);\n",
+"  printf('\n F is %0.1f N ',F);\n",
+"  printf('\n T is %0.1f Nm ',T);\n",
+"  \n",
+"  //The difference in the answers are due to rounding-off of values.\n",
+"  \n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.5: B23_5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-5\n",
+"clc;\n",
+"clear;\n",
+"m=1100;\n",
+"V=65*5/18;\n",
+"t=4;\n",
+"r=0.22;\n",
+"mb=12;\n",
+"C=460;\n",
+"S=0.5*V*t;\n",
+"//Total kinetic energy TE=K.E(vehicle)+K.E(rotating parts).\n",
+"TE=((0.5*m*(V^2))+(0.1*0.5*m*(V^2)));\n",
+"E=TE/4;\n",
+"w=V/r;\n",
+"theta=S/r;\n",
+"T=E/theta;\n",
+"delT=E/(mb*C);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('S is %0.2f m ',S);\n",
+"  printf('\n E is %0.2f Nm ',E);\n",
+"  printf('\n T is %0.2f Nm ',T);\n",
+"  printf('\n delT is %0.2f ',delT);\n",
+"  \n",
+"//The difference in the answers are due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.6: B23_6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-6\n",
+"clc;\n",
+"clear;\n",
+"T=35000;\n",
+"u=0.4;\n",
+"p=0.7;\n",
+"r=200;\n",
+"N=T/(u*r)\n",
+"b=sqrt(N/p);\n",
+"l=b;\n",
+"//2theta = theta2\n",
+"theta2=2*asin(l/(2*r));\n",
+"F=u*N;\n",
+"P=((250*N)-(u*N*80))/550;\n",
+"Ry=N-P;\n",
+"Rx=u*N;\n",
+"R=sqrt(Rx^2+Ry^2);\n",
+"w=2*%pi*100/60;\n",
+"// Rate of heat generated is Q\n",
+"Q=u*N*w*r/1000;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('N is %0.1f N ',N);\n",
+"  printf('\n b is %0.0f mm ',b);\n",
+"  printf('\n P is %0.1f N ',P);\n",
+"  printf('\n R is %0.2f N ',R);\n",
+"  printf('\n Q is %0.2f J/s ',Q);\n",
+"\n",
+"//The answer to Rate of heat generated 'Q' is calculated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 23.7: B23_7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 23-7\n",
+"clc;\n",
+"clear;\n",
+"Vi=20*5/18;\n",
+"Vf=0;\n",
+"m=80;\n",
+"pmax=1;\n",
+"u=0.1;\n",
+"S=50;\n",
+"KE=0.5*m*Vi^2;\n",
+"N=KE/(u*S*2);\n",
+"t=sqrt(N/(pmax*3));\n",
+"b=3*t;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('KE is %0.1f Nm ',KE);\n",
+"  printf('\n N is %0.2f N ',N);\n",
+"  printf('\n t is %0.1f mm ',t);\n",
+"  printf('\n b is %0.1f mm ',b);\n",
+"\n",
+"//The difference in the answers are due to rounding-off of values."
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/24-ROPE_DRIVE.ipynb b/Machine_Design_by_U_C_Jindal/24-ROPE_DRIVE.ipynb
new file mode 100644
index 0000000..c20c60b
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/24-ROPE_DRIVE.ipynb
@@ -0,0 +1,180 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 24: ROPE DRIVE"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 24.1: RD1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 24-1\n",
+"clc;\n",
+"clear;\n",
+"P=150000;\n",
+"m=0.4;\n",
+"D=1.8;\n",
+"d=0.6;\n",
+"C=4.2;\n",
+"V=15;\n",
+"Fc=m*V^2;\n",
+"BL=44.81*10^3;\n",
+"FOS=35;\n",
+"F1=BL/FOS;\n",
+"theta=%pi-(2*asin((D-d)/(2*C)));\n",
+"beta=22.5*%pi/180;\n",
+"u=0.13;\n",
+"x=u*theta/sin(beta);\n",
+"F2=(F1-Fc)/exp(x);\n",
+"n=P/((F1-F2)*V);\n",
+"n=13;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('n is %0.0f    ',n);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 24.2: RD2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 24-2\n",
+"clc;\n",
+"clear;\n",
+"W=1000;\n",
+"m=0.498;\n",
+"BL=78;\n",
+"d=12;\n",
+"Am=0.39*d^2;\n",
+"dw=sqrt(Am*4/(6*19*%pi));\n",
+"Ew=74.4*10^3;\n",
+"Ds=56*d;\n",
+"sigb=Ew*dw/Ds;\n",
+"Wb=sigb*%pi*(d^2)/4*10^-3;\n",
+"l=20;\n",
+"Ws=m*l;\n",
+"a=1.2;\n",
+"Wa=a*(W/2+Ws)*10^-3;\n",
+"//Let the static load be Ps\n",
+"Ps=(W/2+Ws)*9.81*10^-3;\n",
+"//let the effective load  be Peff\n",
+"Peff=Ps+Wb+Wa;\n",
+"FOS1=BL/Peff;\n",
+"FOS2=BL/(5+0.612);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('annual FOS is %0.2f    ',FOS1);\n",
+"  printf('\n FOS neglecting bending load is %0.1f    ',FOS2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 24.3: RD3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 24-3\n",
+"clc;\n",
+"clear;\n",
+"d=12;\n",
+"sigut=1960;\n",
+"Pb=0.0025*sigut;\n",
+"Ds=480;\n",
+"F=Pb*d*Ds/2;\n",
+"W=F*2*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('W is %0.3f kN   ',W);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 24.4: RD4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 24-4\n",
+"clc;\n",
+"clear;\n",
+"sigut=1770;\n",
+"Pb=0.0018*sigut;\n",
+"W=4000;\n",
+"a=2.5/2;\n",
+"Ws=90*0.5;\n",
+"Wa=(W+Ws)*a/9.81;\n",
+"Weff=W+Wa;\n",
+"d=sqrt(Weff*2/(23*Pb));\n",
+"d=12;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm   ',d);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/25-GEARS.ipynb b/Machine_Design_by_U_C_Jindal/25-GEARS.ipynb
new file mode 100644
index 0000000..47d4c6a
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/25-GEARS.ipynb
@@ -0,0 +1,347 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 25: GEARS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.1: G1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-1\n",
+"clc;\n",
+"clear;\n",
+"Zp=25;\n",
+"Zg=60;\n",
+"m=5;\n",
+"dp=m*Zp;\n",
+"dg=m*Zg;\n",
+"CD=(dp+dg)/2;\n",
+"ha=m;\n",
+"hf=1.25*m;\n",
+"c=hf-ha;\n",
+"r=0.4*m;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('dp is %0.0f mm  ',dp);\n",
+"  printf('\n dg is %0.0f mm  ',dg);\n",
+"  printf('\n CD is %0.1f mm   ',CD);\n",
+"  printf('\n ha is %0.0f mm   ',ha);\n",
+"  printf('\n hf is %0.2f mm   ',hf);\n",
+"  printf('\n c is %0.2f mm   ',c);\n",
+"  printf('\n r is %0.0f mm   ',r);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.2: G2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-2\n",
+"clc;\n",
+"clear;\n",
+"N=800;\n",
+"P=6000;\n",
+"n=200;\n",
+"Cs=1.4;\n",
+"sigb=150;\n",
+"FOS=2;\n",
+"Zp=18;\n",
+"Zg=Zp*N/n;\n",
+"Y=%pi*(0.154-(0.912/Zp));\n",
+"p=[1 0 -9.5846 -38.135];\n",
+"\n",
+"function r= myroots (p)\n",
+"    \n",
+"a= coeff (p ,0);\n",
+"b= coeff (p ,1);\n",
+"c= coeff (p ,2);\n",
+"d= coeff (p, 3);\n",
+"r(1)=( -b+ sqrt (b^2 -4*a*c ))/(2* a);\n",
+"r(2)=( -b- sqrt (b^2 -4*a*c ))/(2* a);\n",
+"endfunction\n",
+"m=roots(p);\n",
+"m=4.5;\n",
+"dp=m*Zp;\n",
+"dg=m*Zg;\n",
+"// printing data in scilab o/p window\n",
+"  printf('dp is %0.0f mm  ',dp);\n",
+"  printf('\n dg is %0.0f mm  ',dg);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.3: G3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-3\n",
+"clc;\n",
+"clear;\n",
+"Zp=30;\n",
+"N=1000;\n",
+"Zg=75;\n",
+"m=5;\n",
+"b=60;\n",
+"sigut=450;\n",
+"BHN=350;\n",
+"Cs=1.5;\n",
+"FOS=2;\n",
+"dp=m*Zp;\n",
+"dg=m*Zg;\n",
+"v=2*%pi*N*dp/(60*1000*2);\n",
+"Cv=3/(3+v);\n",
+"sigb=450/3;\n",
+"Y=0.358;\n",
+"Sb=m*b*sigb*Y;\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"K=0.16*(BHN/100)^2;\n",
+"Sw=b*dp*Q*K;\n",
+"Pt=Sb*Cv/(Cs*FOS);\n",
+"P=Pt*v;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Sb is %0.0f N   ',Sb);\n",
+"  printf('\n Sw is %0.0f N  ',Sw);\n",
+"  printf('\n P is %0.3f kW  ',P);\n",
+"\n",
+"//The difference in the value of Sw is due to rounding-off of the value of Q."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.4: G4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-4\n",
+"clc;\n",
+"clear;\n",
+"n=240;\n",
+"P=8000;\n",
+"N=1200;\n",
+"CD=300;\n",
+"Cs=1.5;\n",
+"alpha=20*%pi/180;\n",
+"G=N/n;\n",
+"dp=CD*2/6;\n",
+"dg=5*dp;\n",
+"v=2*%pi*N*dp/(60*1000*2);\n",
+"Cv=3/(3+v);\n",
+"Pt=P/v;\n",
+"Peff=Pt*Cs/Cv;\n",
+"m=4;\n",
+"b=10*m;\n",
+"FOS=2;\n",
+"Sb=Peff*FOS;\n",
+"sigut=600;\n",
+"sigb=sigut/3;\n",
+"Zp=dp/m;\n",
+"Zg=dg/m;\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"K=Sb/(b*dp*Q);\n",
+"BHN=sqrt(K/0.16)*100;\n",
+"BHN=333;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('BHN is %0.0f    ',BHN);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.5: G5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-5\n",
+"clc;\n",
+"clear;\n",
+"alpha=20*%pi/180;\n",
+"N=800;\n",
+"P=6000;\n",
+"sigut=450;\n",
+"i=5;\n",
+"Cs=1.3;\n",
+"v=3.6;\n",
+"FOS=2;\n",
+"Pt=P/v;\n",
+"Cv=3/(3+v);\n",
+"sigb=sigut/3;\n",
+"dp=3.6*1000*2*60/(2*%pi*N);\n",
+"dp=86;\n",
+"Sb=Pt*Cs/Cv*FOS;\n",
+"//Let x be m^2*Y\n",
+"x=Sb/(10*sigb);\n",
+"m=5;\n",
+"Zp=18;\n",
+"dp=m*Zp;\n",
+"Zg=i*Zp;\n",
+"dg=m*Zg;\n",
+"b=10*m;\n",
+"phip=m+(0.25*sqrt(dp));\n",
+"ep=32+(2.5*phip);\n",
+"phig=m+(0.25*sqrt(dg));\n",
+"eg=32+(2.5*phig);\n",
+"e=ep+eg;\n",
+"e=e*10^-3;\n",
+"Ps=Cs*Pt;\n",
+"r1=dp/2;\n",
+"r2=dg/2;\n",
+"Pd=e*N*Zp*b*r1*r2/(2530*sqrt(r1^2+r2^2));\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"K=Sb/(b*dp*Q);\n",
+"BHN=sqrt(K/0.16)*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ps is %0.2f N   ',Ps);\n",
+"  printf('\n Pd is %0.1f N   ',Pd);\n",
+"  printf('\n BHN is %0.0f   ',BHN);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 25.6: G6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 25-4\n",
+"clc;\n",
+"clear;\n",
+"P=9000;\n",
+"N=900;\n",
+"n=150;\n",
+"sigut=750;\n",
+"BHN=300;\n",
+"Cs=1.5;\n",
+"FOS=2;\n",
+"i=N/n;\n",
+"x=sqrt(i);\n",
+"Zp=18;\n",
+"Zg=x*Zp;\n",
+"Zg=44;\n",
+"//Let actual speed reduction be xa\n",
+"xa=Zg/Zp;\n",
+"n1=N/xa^2;\n",
+"T1=P*60/(2*%pi*N);\n",
+"i2=N/xa;\n",
+"T2=N/i2*T1;\n",
+"m=6;\n",
+"dp=Zp*m;\n",
+"dg=m*Zg;\n",
+"phip=m+(0.25*sqrt(dp));\n",
+"ep=16+(1.25*phip);\n",
+"phig=m+(0.25*sqrt(dg));\n",
+"eg=16+(1.25*phig);\n",
+"e=ep+eg;\n",
+"e=e*10^-3;\n",
+"Pt=26000;\n",
+"Ps=Cs*Pt;\n",
+"r1=dp/2;\n",
+"r2=dg/2;\n",
+"b=10*m;\n",
+"Pd=e*i2*Zp*b*r1*r2/(2530*sqrt(r1^2+r2^2));\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"sigb=sigut/3;\n",
+"Y=0.308;\n",
+"\n",
+"Sb=b*m*sigb*Y;\n",
+"K=0.16*(BHN/100)^2;\n",
+"Sw=b*dp*K*Q;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('m is %0.0f mm   ',m);\n",
+"  printf('\n Pd is %0.3f N   ',Pd);\n",
+"  printf('\n Sw is %0.0f N   ',Sw);\n",
+"  \n",
+"  //The difference in the values is due to rounding-off of the values."
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/26-HELICAL_GEARS.ipynb b/Machine_Design_by_U_C_Jindal/26-HELICAL_GEARS.ipynb
new file mode 100644
index 0000000..bd4213f
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/26-HELICAL_GEARS.ipynb
@@ -0,0 +1,241 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 26: HELICAL GEARS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 26.1: HG1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 26-1\n",
+"clc;\n",
+"clear;\n",
+"Zp=20;\n",
+"Zg=50;\n",
+"alphan=20*%pi/180;\n",
+"phi=15*%pi/180;\n",
+"mn=4;\n",
+"m=mn/cos(phi);\n",
+"alpha=180/%pi*atan(tan(alphan)/(cos(phi)));\n",
+"dp=Zp*m;\n",
+"dg=Zg*m;\n",
+"ha=4;\n",
+"hd=1.25*mn;\n",
+"//Let addendum circle dia of pinion be Pa\n",
+"Pa=dp+(2*mn);\n",
+"//Let dedendum circle dia of pinion be Pd\n",
+"Pd=dp-(2.5*mn);\n",
+"//Let addendum circle dia of gear be Ga\n",
+"Ga=dg+(2*mn);\n",
+"//Let dedendum circle dia of gear be Gd\n",
+"Gd=dg-(2.5*mn);\n",
+"b=%pi*mn/sin(phi);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('m is %0.2f mm  ',m);\n",
+"  printf('\n alpha is %0.3f deg  ',alpha);\n",
+"  printf('\n Pa is %0.1f mm   ',Pa);\n",
+"  printf('\n Pd is %0.1f mm   ',Pd);\n",
+"  printf('\n Ga is %0.0f mm   ',Ga);\n",
+"  printf('\n Gd is %0.0f mm   ',Gd);\n",
+"  printf('\n b is %0.2f mm   ',b);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 26.2: HG2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 26-2\n",
+"clc;\n",
+"clear;\n",
+"P=5000;\n",
+"Zp=25;\n",
+"Zg=50;\n",
+"mn=4;\n",
+"alphan=20*%pi/180;\n",
+"phi=20*%pi/180;\n",
+"N=1200;\n",
+"m=mn/cos(phi);\n",
+"dp=Zp*m;\n",
+"dg=Zg*m;\n",
+"v=2*%pi*N*dp/(60*2*1000);\n",
+"Pt=P/v;\n",
+"Pa=Pt*tan(phi);\n",
+"Pr=Pt*tan(alphan)/cos(phi);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Pt is %0.2f N   ',Pt);\n",
+"  printf('\n Pa is %0.1f N  ',Pa);\n",
+"  printf('\n Pr is %0.2f N  ',Pr);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 26.3: HG3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 26-3\n",
+"clc;\n",
+"clear;\n",
+"Zp=24;\n",
+"Zg=72;\n",
+"alphan=20*%pi/180;\n",
+"phi=24*%pi/180;\n",
+"N=720;\n",
+"mn=5;\n",
+"b=50;\n",
+"sigut=600;\n",
+"BHN=360;\n",
+"Cs=1.4;\n",
+"FOS=2;\n",
+"sigb=sigut/3;\n",
+"dp=mn*Zp/cos(phi);\n",
+"Zp=Zp/(cos(phi))^3;\n",
+"Zg=Zg/(cos(phi))^3;\n",
+"Y=0.358+((0.364-0.358)*1.48/2);\n",
+"Sb=b*mn*sigb*Y;\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"K=0.16*(BHN/100)^2;\n",
+"Sw=b*dp*Q*K/(cos(phi)^2);\n",
+"v=2*%pi*N*dp/(60*2*1000);\n",
+"Cv=5.6/(5.6+sqrt(v));\n",
+"Peff=Sb/FOS;\n",
+"Pt=Peff*Cv/Cs;\n",
+"P=Pt*v;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.3f kW   ',P);\n",
+"\n",
+"//The difference in the value is due to rounding-off of the values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 26.4: HG4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 26-4\n",
+"clc;\n",
+"clear;\n",
+"Zp=25;\n",
+"Zg=100;\n",
+"P=5000;\n",
+"N=2000;\n",
+"alphan=20*%pi/180;\n",
+"phi=15*%pi/180;\n",
+"sigut=660;\n",
+"Cs=1.5;\n",
+"FOS=1.8;\n",
+"v=10;\n",
+"Zp1=Zp/(cos(phi))^3;\n",
+"Zg1=Zg/(cos(phi))^3;\n",
+"Y=0.348+(0.74*0.004);\n",
+"sigb=sigut/3;\n",
+"Cv=5.6/(5.6+sqrt(v));\n",
+"//Sb=FOS*Peff\n",
+"mn=FOS*P*Cs*60*1000*2*cos(phi)/(2*%pi*N*Cv*Zp*12*sigb*Y);\n",
+"mn=mn^(1/3);\n",
+"mn=2.5;\n",
+"dp=mn*Zp/cos(phi);\n",
+"Q=(2*Zg)/(Zp+Zg);\n",
+"b=12*mn;\n",
+"Sb=12*sigb*Y;\n",
+"K=Sb*(cos(phi)^2)/(dp*Q*b);\n",
+"BHN=sqrt(K/0.16)*100;\n",
+"dg=mn*Zg/cos(phi);\n",
+"phip=mn+(0.25*sqrt(dp));\n",
+"ep=16+(1.25*phip);\n",
+"phig=mn+(0.25*sqrt(dg));\n",
+"eg=16+(1.25*phig);\n",
+"e=ep+eg;\n",
+"e=e*10^-3;\n",
+"r1=dp/2;\n",
+"r2=dg/2;\n",
+"Pd=e*N*Zp1*b*r1*r2/(2530*sqrt(r1^2+r2^2));\n",
+"v=2*%pi*N*dp/(60*2*1000);\n",
+"//Let tangential component be TC\n",
+"TC=(Cs*1845/mn)+(Pd*cos(alphan)*cos(phi));\n",
+"\n",
+"Sb=b*mn*sigb*Y;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('mn is %0.1f mm   ',mn);\n",
+"  printf('\n TC is %0.0f N  ',TC);\n",
+"  printf('\n Sb is %0.1f N  ',Sb);\n",
+"  \n",
+"  //The difference in the value  of Sb is due to rounding-off of t"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/27-STRAIGHT_BEVEL_GEARS.ipynb b/Machine_Design_by_U_C_Jindal/27-STRAIGHT_BEVEL_GEARS.ipynb
new file mode 100644
index 0000000..24e0363
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/27-STRAIGHT_BEVEL_GEARS.ipynb
@@ -0,0 +1,417 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 27: STRAIGHT BEVEL GEARS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.1: SBG1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-1\n",
+"clc;\n",
+"clear;\n",
+"P=8000;\n",
+"N1=400;\n",
+"N2=200;\n",
+"i=N1/N2; //i=Zg/Zp=dg/dp\n",
+"gamma1=atan(1/i);\n",
+"gamma2=90-gamma1;\n",
+"rp=200;\n",
+"R=rp/sin(gamma1);\n",
+"b=0.2*R;\n",
+"rm1=rp-(b*sin(gamma1)/2);\n",
+"Pt=P*1000*60/(2*%pi*N1*rm1);\n",
+"alpha=20*%pi/180;\n",
+"Ps=Pt*tan(alpha);\n",
+"Pr=Ps*cos(gamma1);\n",
+"Pa=Ps*sin(gamma1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Pt is %0.0f N  ',Pt);\n",
+"  printf('\n Ps is %0.2f N  ',Ps);\n",
+"  printf('\n Pr is %0.2f N  ',Pr);\n",
+"  printf('\n Pa  is %0.2f N  ',Pa);\n",
+"\n",
+"//The difference in the values is due to rounding-off of the values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.2: SBG2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-2\n",
+"clc;\n",
+"clear;\n",
+"alpha=20*%pi/180;\n",
+"Zp=20;\n",
+"Zg=36;\n",
+"m=4;\n",
+"sigut=600;\n",
+"b=25;\n",
+"dp=m*Zp;\n",
+"rp=dp/2;\n",
+"dg=m*Zg;\n",
+"rg=dg/2;\n",
+"gamma1=atan(rp/rg);\n",
+"Zpv=Zp/cos(gamma1);\n",
+"Y=0.33+0.003*0.88;\n",
+"sigb=sigut/3;\n",
+"Sb=m*b*sigb*Y;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Zpv is %0.2f   ',Zpv);\n",
+"  printf('\n Sb is %0.0f N  ',Sb);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.3: SBG3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-3\n",
+"clc;\n",
+"clear;\n",
+"m=6;\n",
+"Zp=30;\n",
+"Zg=45;\n",
+"dp=m*Zp;\n",
+"rp=dp/2;\n",
+"dg=m*Zg;\n",
+"rg=dg/2;\n",
+"R=sqrt(rg^2+rp^2);\n",
+"gamma1=180/%pi*asin(rp/R);\n",
+"gamma2=(90-gamma1);\n",
+"ha=6;\n",
+"hf=1.25*ha;\n",
+"phi=180/%pi*atan(ha/R);\n",
+"beta=180/%pi*atan(hf/R);\n",
+"//let Face Cone Angle be FCA\n",
+"FCA=(gamma1+phi);\n",
+"//Let Root cone angle be RCA\n",
+"RCA=(gamma1-beta);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' gamma1 is %0.1f deg  ',gamma1);\n",
+"  printf('\n gamma2 is %0.1f deg  ',gamma2);\n",
+"  printf('\n R  is %0.2f mm  ',R);\n",
+"  printf('\n FCA  is %0.3f deg  ',FCA);\n",
+"  printf('\n RCA  is %0.2f deg  ',RCA);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.4: SBG4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-4\n",
+"clc;\n",
+"clear;\n",
+"alpha=20*%pi/180;\n",
+"Zp=25;\n",
+"Zg=40;\n",
+"m=5;\n",
+"b=30;\n",
+"BHN=400;\n",
+"dp=m*Zp;\n",
+"rp=dp/2;\n",
+"dg=m*Zg;\n",
+"rg=dg/2;\n",
+"gamma1=atan(rp/rg);\n",
+"gamma1=180/%pi*gamma1;\n",
+"gamma2=(90-gamma1);\n",
+"a=cosd(gamma2);\n",
+"Zp1=Zp/cos(gamma1);\n",
+"Zg1=Zg/a;\n",
+"Q=(2*Zg1)/(Zp1+Zg1);\n",
+"K=0.16*(BHN/100)^2;\n",
+"Sw=0.75*b*dp*Q*K/cosd(gamma1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Sw is %0.1f N  ',Sw);\n",
+"  \n",
+"  //The difference in the value of Sw is due to rounding-off of the value of Q.\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.5: SBG5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-5\n",
+"clc;\n",
+"clear;\n",
+"Zp=20;\n",
+"Zg=36;\n",
+"m=4;\n",
+"b=25;\n",
+"BHN=360;\n",
+"Np=750;\n",
+"FOS=1.75;\n",
+"dp=m*Zp;\n",
+"rp=dp/2;\n",
+"dg=m*Zg;\n",
+"rg=dg/2;\n",
+"gamma1=atan(dp/dg);\n",
+"gamma1=180/%pi*gamma1;\n",
+"gamma2=(90-gamma1);\n",
+"a=cosd(gamma2);\n",
+"Zp1=Zp/cosd(gamma1);\n",
+"Zg1=Zg/a;\n",
+"Q=(2*Zg1)/(Zp1+Zg1);\n",
+"K=0.16*(BHN/100)^2;\n",
+"R=sqrt(rp^2+rg^2);\n",
+"Y=0.33+0.003*0.86;\n",
+"sigut=600;\n",
+"sigb=sigut/3;\n",
+"Sb=m*b*Y*sigb*(1-(b/R));\n",
+"Sw=0.75*b*dp*Q*K/cosd(gamma1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Sb is %0.0f N   ',Sb);\n",
+"  printf('\n Sw is %0.1f N  ',Sw);\n",
+"\n",
+"//The answwer to Sb is calculated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.6: SBG6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-6\n",
+"clc;\n",
+"clear;\n",
+"Dp=300;\n",
+"rp=150;\n",
+"//Let the angular velocity ratio be i\n",
+"i=2/3;\n",
+"rg=rp/i;\n",
+"Dg=2*rg;\n",
+"R=sqrt(rp^2+rg^2);\n",
+"P=15000;\n",
+"N=300;\n",
+"Cs=1.5;\n",
+"FOS=2;\n",
+"sigb=100;\n",
+"gamma1=atan(Dp/Dg);\n",
+"gamma1=180/%pi*gamma1;\n",
+"gamma2=(90-gamma1);\n",
+"v=2*%pi*N*rp/(60*1000);\n",
+"Cv=5.6/(5.6+sqrt(v));\n",
+"Pt=P/v;\n",
+"Peff=Pt*Cs/Cv;\n",
+"Sb=Peff*FOS;\n",
+"b=R/4;\n",
+"//let x=m*Y\n",
+"x=Sb/(b*sigb*(1-(b/R)));\n",
+"m=6;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('m*Y is %0.3f mm^2  ',x);\n",
+"  printf('\n m is %0.0f mm  ',m);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.7: SBG7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-7\n",
+"clc;\n",
+"clear;\n",
+"Zp=24;\n",
+"Zg=36;\n",
+"N=1400;\n",
+"P=11600;\n",
+"Cs=1.4;\n",
+"FOS=2;\n",
+"sigut=600;\n",
+"sigb=sigut/3;\n",
+"gamma1=atan(Zp/Zg);\n",
+"gamma1=180/%pi*gamma1;\n",
+"gamma2=(90-gamma1);\n",
+"a=cosd(gamma2);\n",
+"Zp1=Zp/cosd(gamma1);\n",
+"Zg1=Zg/a;\n",
+"Q=(2*Zg1)/(Zp1+Zg1);\n",
+"v=1.76;\n",
+"Pt=P/v;\n",
+"Cv=5.6/(5.6+sqrt(v));\n",
+"Peff=Pt*Cs/Cv;\n",
+"x=Peff*FOS;\n",
+"Y=0.352+(0.003*0.85);\n",
+"y=2*sigb*Y*(1-(6/21.63));\n",
+"m=sqrt(x/y);\n",
+"// Design is safe for m=4\n",
+"m=4;\n",
+"b=6*m;\n",
+"dp=24*m;\n",
+"rp=48;\n",
+"dp=dp/cosd(gamma1);\n",
+"v=2*%pi*N*rp/(60*1000);\n",
+"Cv=5.6/(5.6+sqrt(v));\n",
+"Sb=y*m^2;\n",
+"//Sw=Sb;\n",
+"K=Sb/(0.75*b*dp*Q);\n",
+"BHN=sqrt(K/0.16)*100;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('m is %0.0f mm  ',m);\n",
+"  printf('\n BHN is %0.0f   ',BHN);\n",
+"  \n",
+"  //The answwer to BHN is calculated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 27.8: SBG8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 27-8\n",
+"clc;\n",
+"clear;\n",
+"Zp=40;\n",
+"Zg=60;\n",
+"P=3500;\n",
+"N=600;\n",
+"Cs=1.5;\n",
+"sigb=55;\n",
+"gamma1=atan(Zp/Zg);\n",
+"gamma1=180/%pi*gamma1;\n",
+"gamma2=(90-gamma1);\n",
+"a=cosd(gamma2);\n",
+"Zp1=Zp/cosd(gamma1);\n",
+"Zg1=Zg/a;\n",
+"Q=(2*Zg1)/(Zp1+Zg1);\n",
+"// Design is safe for m=6\n",
+"m=6;\n",
+"b=6*m;\n",
+"dp=Zp*m;\n",
+"rp=dp/2;\n",
+"dg=Zg*m;\n",
+"rg=dg/2;\n",
+"R=sqrt(rp^2+rg^2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('m is %0.0f mm  ',m);\n",
+"  printf('\n b is %0.0f mm  ',b);\n",
+"  printf('\n R is %0.0f mm  ',R);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/28-WORM_AND_WORM_WHEEL_SET.ipynb b/Machine_Design_by_U_C_Jindal/28-WORM_AND_WORM_WHEEL_SET.ipynb
new file mode 100644
index 0000000..1904982
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/28-WORM_AND_WORM_WHEEL_SET.ipynb
@@ -0,0 +1,299 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 28: WORM AND WORM WHEEL SET"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.1: WWS1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 28-1\n",
+"clc;\n",
+"clear;\n",
+"Z1=1;\n",
+"Z2=30;\n",
+"q=10;\n",
+"m=5;\n",
+"d=q*m;\n",
+"D=m*Z2;\n",
+"//let the speed reduction ratio be G\n",
+"G=Z2/Z1;\n",
+"CD=(d+D)/2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('G is %0.0f   ',G);\n",
+"  printf('\n CD is %0.0f mm  ',CD);\n",
+"  printf('\n d  is %0.0f mm  ',d);\n",
+"  printf('\n D  is %0.0f mm  ',D);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.2: WWS2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 28-2\n",
+"clc;\n",
+"clear;\n",
+"Z1=1;\n",
+"Z2=52;\n",
+"q=10;\n",
+"m=8;\n",
+"i=Z2/Z1;\n",
+"CD=((m*q)+(m*Z2))/2;\n",
+"lambda=atan(Z1/q);\n",
+"d=q*m;\n",
+"da=m*(q+2);\n",
+"df=m*(q+2-(4.4*cos(lambda)));\n",
+"pa=m*%pi;\n",
+"D=m*Z2;\n",
+"Da=m*(Z2+(4*cos(lambda))-2);\n",
+"Df=m*(Z2-2-(0.4*cos(lambda)));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf(' i is %0.0f   ',i);\n",
+"  printf('\n CD is %0.0f mm  ',CD);\n",
+"  printf('\n pa is %0.2f mm  ',pa);\n",
+"  printf('\n da is %0.0f mm  ',da);\n",
+"  printf('\n df is %0.3f mm  ',df);\n",
+"  printf('\n Da is %0.3f mm  ',Da);\n",
+"  printf('\n Df is %0.3f mm  ',Df);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.3: WWS3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 28-3\n",
+"clc;\n",
+"clear;\n",
+"Z1=2;\n",
+"Z2=60;\n",
+"q=10;\n",
+"m=5;\n",
+"P=6000;\n",
+"N=1440;\n",
+"u=0.08;\n",
+"alpha=20*%pi/180;\n",
+"lambda=atan(Z1/q);\n",
+"d=m*q;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"Ptw=T*10^3/(d/2);\n",
+"a=cos(alpha);\n",
+"b=cos(lambda);\n",
+"x=sin(alpha);\n",
+"y=sin(lambda);\n",
+"Paw=Ptw*(((a*b)-(u*y))/((a*y)+(u*b)));\n",
+"Prw=Ptw*y/((a*y)+(u*b));\n",
+"//Paw=Ptw*((cos(alpha)*cos(lambda))-(u*sin(lambda)))/((cos(alpha)*sin(lambda))+(u*cos(lambda)));\n",
+"//Prw=Ptw*((sin(alpha))/((cos(alpha)*sin(lambda))+(u*cos(lambda))));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ptw=Pag is %0.1f N  ',Ptw);\n",
+"  printf('\n Paw=Ptg is %0.0f N  ',Paw);\n",
+"  printf('\n Prw=Prg  is %0.0f N  ',Prw);\n",
+"  \n",
+"//The difference in the value is due to rounding-off the values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.4: WWS4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 28-4\n",
+"clc;\n",
+"clear;\n",
+"Z1=2;\n",
+"Z2=40;\n",
+"q=8;\n",
+"m=5;\n",
+"d=q*m;\n",
+"P=1.2;\n",
+"lambda=atan(Z1/q);\n",
+"N=1000;\n",
+"Vt=2*%pi*N*20/(60*1000);\n",
+"Vs=Vt/cos(lambda);\n",
+"u=0.032;\n",
+"alpha=20*%pi/180;\n",
+"x=cos(alpha);\n",
+"y=tan(lambda);\n",
+"z=(cos(lambda))/sin(lambda);\n",
+"n=(x-(u*y))/(x+(u*z));\n",
+"//Let power output be Po\n",
+"Po=P*n;\n",
+"//Let power lost in friction be Pf\n",
+"Pf=P-Po;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.1f kW  ',P);\n",
+"  printf('\n Po is %0.3f kW  ',Po);\n",
+"  printf('\n Pf is %0.3f kW  ',Pf);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.5: WWS5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 28-5\n",
+"clc;\n",
+"clear;\n",
+"Z1=2;\n",
+"Z2=54;\n",
+"q=10;\n",
+"m=8;\n",
+"P=4000;\n",
+"A=1.8;\n",
+"K=16;\n",
+"N=1000;\n",
+"u=0.028;\n",
+"lambda=atan(Z1/q);\n",
+"alpha=20*%pi/180;\n",
+"d=m*q;\n",
+"Vt=2*%pi*N*d/(2*60*1000);\n",
+"Vs=Vt/cos(lambda);\n",
+"x=cos(alpha);\n",
+"y=tan(lambda);\n",
+"z=(cos(lambda))/sin(lambda);\n",
+"n=(x-(u*y))/(x+(u*z));\n",
+"delT=P*(1-n)/(K*A);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('n is %0.3f   ',n);\n",
+"  printf('\n delT is %0.2f deg  ',delT);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 28.6: WWS6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"//sum 28-6\n",
+"clc;\n",
+"clear;\n",
+"Z1=1;\n",
+"Z2=30;\n",
+"q=10;\n",
+"m=6;\n",
+"//Let the ultimate strength of gear is sigut\n",
+"//Let the allowable strenth of wheel is sigb\n",
+"sigut=450;\n",
+"sigb=84;\n",
+"N=1200;\n",
+"n=N/Z2;\n",
+"alpha=20*%pi/180;\n",
+"d=m*q;\n",
+"D=Z2*m;\n",
+"b=3*d/4;\n",
+"V=2*%pi*n*D/(2*60*1000);\n",
+"Cv=6/(6+V);\n",
+"y=0.154-(0.912/Z2);\n",
+"Y=%pi*y;\n",
+"Sb=sigb*b*Cv*m*Y;\n",
+"K=0.415;\n",
+"Sw=b*D*K;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Sb is %0.0f N  ',Sb);\n",
+"  printf('\n Sw is %0.0f N  ',Sw);\n",
+"\n",
+"//The difference in the value of Sb is due to rounding-off the values."
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/29-GEARBOX.ipynb b/Machine_Design_by_U_C_Jindal/29-GEARBOX.ipynb
new file mode 100644
index 0000000..20b85cb
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/29-GEARBOX.ipynb
@@ -0,0 +1,205 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 29: GEARBOX"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 29.1: GB1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 29-1\n",
+"clc;\n",
+"clear;\n",
+"Ts1=16;\n",
+"Ts2=18;\n",
+"Ts3=20;\n",
+"Ts4=25;\n",
+"Tr1=64;\n",
+"Tr2=63;\n",
+"Tr3=70;\n",
+"Tr4=50;\n",
+"//Let Nr1/Nr2=G1\n",
+"G1=1+(Ts1/Tr1);\n",
+"//Let Nr1/Ni=G2\n",
+"G2=(Ts2/(Tr2*(1-(1/G1)+(Ts2/Tr2))));\n",
+"//Let Ni/No=G3 (third gear)\n",
+"G3=(1+(Ts3/Tr3))/((Ts3/Tr3)+G2);\n",
+"\n",
+"//Let Ni/Nr1=G4\n",
+"//The ratio calculations are done as above\n",
+"G4=1.2857/0.2857;\n",
+"//Let Ni/No =G5(second gear)\n",
+"G5=-20/70;\n",
+"//Let Ni/No=G6(first gear)\n",
+"G6=1.2857/0.2857;\n",
+"//Let Ni/No=G7(reverse gear)\n",
+"G7=-1.7143/0.2857;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('ratio for third gear is %0.3f    ',G3);\n",
+"  printf('\n ratio for second gear is %0.4f   ',G5);\n",
+"  printf('\n ratio for first gear is %0.1f   ',G6);\n",
+"  printf('\n ratio for reverse gear is %0.3f   ',G7);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 29.2: GB2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 29-2\n",
+"clc;\n",
+"clear;\n",
+"//Let reverse speed gear be RSG\n",
+"RSG=5.5;\n",
+"//Let T5/T6 = Z1\n",
+"T1=2;\n",
+"//Let T3/T7 = Z2\n",
+"Z2=2.75;\n",
+"T7=18;\n",
+"T3=Z2*T7;\n",
+"T3=50;\n",
+"//Let T3/T1 =Z3\n",
+"Z3=2.5;\n",
+"T1=T3/Z3;\n",
+"//Let T4/T2 = Z4\n",
+"Z4=2.25/2;\n",
+"T2=(T1+T3)/(Z4+1);\n",
+"T4=T1+T3-T2;\n",
+"//Let T5/T6=Z5\n",
+"Z5=2;\n",
+"T6=(T1+T3)/3;\n",
+"T5=(T1+T3)-T6;\n",
+"T7=18;\n",
+"//let first gear ratio is G1\n",
+"G1=50*47/(20*23);\n",
+"\n",
+"//Let 2nd gear ratio is G2\n",
+"G2=37*47/(33*23);\n",
+"//Let 3rd gear ratio is G3\n",
+"G3=1;\n",
+"//Let reverse gear ratio is R\n",
+"R=50*47/(18*23);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T1 is %0.0f    ',T1);\n",
+"  printf('\n T2 is %0.0f    ',T2);\n",
+"  printf('\n T3 is %0.0f    ',T3);\n",
+"  printf('\n T4 is %0.0f    ',T4);\n",
+"  printf('\n T5 is %0.0f    ',T5);\n",
+"  printf('\n T6 is %0.0f    ',T6);\n",
+"  printf('\n T7 is %0.0f    ',T7);\n",
+"  printf('\n G1 is %0.3f    ',G1);\n",
+"  printf('\n G2 is %0.3f    ',G2);\n",
+"  printf('\n G3 is %0.1f    ',G3);\n",
+"  printf('\n R is %0.3f    ',R);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 29.3: GB3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 29-3\n",
+"clc;\n",
+"clear;\n",
+"//Let the constant gear ratio be G\n",
+"G=2;\n",
+"x=5.5^(1/3);\n",
+"G1=1;\n",
+"G2=x;\n",
+"G3=x*x;\n",
+"G4=x^3;\n",
+"T7=18;\n",
+"T8=T7*(x^3)/2;\n",
+"T8=51;\n",
+"T5=69/2.558;\n",
+"T6=69-27;\n",
+"T4=69/1.8825;\n",
+"T3=69-T4;\n",
+"T1=23;\n",
+"T2=46;\n",
+"T9=18;\n",
+"G1=T2*T8/(T1*T7);\n",
+"G2=T2*T6/(T1*T5);\n",
+"G3=1;\n",
+"G4=-T2*T8/(T1*T9);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T1 is %0.0f    ',T1);\n",
+"  printf('\n T2 is %0.0f    ',T2);\n",
+"  printf('\n T3 is %0.0f    ',T3);\n",
+"  printf('\n T4 is %0.0f    ',T4);\n",
+"  printf('\n T5 is %0.0f    ',T5);\n",
+"  printf('\n T6 is %0.0f    ',T6);\n",
+"  printf('\n T7 is %0.0f    ',T7);\n",
+"  printf('\n T8 is %0.0f    ',T8);\n",
+"  printf('\n T9 is %0.0f    ',T9);\n",
+"  printf('\n G1 is %0.3f    ',G1);\n",
+"  printf('\n G2 is %0.3f    ',G2);\n",
+"  printf('\n G3 is %0.3f    ',G3);\n",
+"  printf('\n G4 is %0.3f    ',G4);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/3-MECHANICS_OF_SOLIDS.ipynb b/Machine_Design_by_U_C_Jindal/3-MECHANICS_OF_SOLIDS.ipynb
new file mode 100644
index 0000000..a1d59e8
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/3-MECHANICS_OF_SOLIDS.ipynb
@@ -0,0 +1,1260 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 3: MECHANICS OF SOLIDS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.10: MS10.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-10\n",
+"clc;\n",
+"clear;\n",
+"G=38*10^3;\n",
+"d=10;\n",
+"P=5*10^3;\n",
+"A=%pi*d^2/4;\n",
+"sig=P/A;\n",
+"deld=0.0002;\n",
+"//Let the lateral strain be E1\n",
+"E1=deld/d;\n",
+"v=2*deld*G/(sig-(2*deld*G));\n",
+"E=2*G*(1+v)*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('v is %0.4f     ',v);\n",
+"  printf('\n E is %0.3f kN/mm^2     ',E);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.11: MS11.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-11\n",
+"clc;\n",
+"clear;\n",
+"D=1500;\n",
+"p=1.2;\n",
+"sigt=100;\n",
+"sigc=p*D/2;\n",
+"siga=p*D/4;\n",
+"P=sigc*2*10^3;\n",
+"n=0.75;\n",
+"t=sigc/(n*sigt);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.1f mm    ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.12: MS12.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-12\n",
+"clc;\n",
+"clear;\n",
+"D=50;\n",
+"t=1.25;\n",
+"d=0.5;\n",
+"n=1/d;\n",
+"p=1.5;\n",
+"siga=p*D/(4*t);\n",
+"sigc=20.27;\n",
+"sigw=sigc/0.31416;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigw is %0.2f N/mm^2    ',sigw);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.13: MS13.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-13\n",
+"clc;\n",
+"clear;\n",
+"R1=50;\n",
+"p=75;\n",
+"pmax=125;\n",
+"R2=sqrt((pmax+p)*R1^2/(pmax-p));\n",
+"t=R2-R1;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.1f mm    ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.14: MS14.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-14\n",
+"clc;\n",
+"clear;\n",
+"R1=40;\n",
+"R2=60;\n",
+"B=50;\n",
+"E=210*10^3;\n",
+"e=41*10^-6;\n",
+"sig=2*R1^2/(R2^2-R1^2);\n",
+"p=E*e/sig;\n",
+"Fr=p*2*%pi*R1*B;\n",
+"u=0.2;\n",
+"Fa=u*Fr*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Fa is %0.2f kN    ',Fa);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.15: MS15.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-15\n",
+"clc;\n",
+"clear;\n",
+"a1=10*1.5;\n",
+"x1=15-0.75;\n",
+"a2=1.5*(15-1.5);\n",
+"x2=(15-1.5)/2;\n",
+"y1=((a1*x1)+(a2*x2))/(a1+a2);\n",
+"y2=a1-y1;\n",
+"Ixx=(10*1.5^3)/12+(10*1.5*(5.06-1.5/2)^2)+(1.5*13.5^3/12)+(1.5*13.5*(9.94-6.75)^2);\n",
+"Z1=Ixx/y1;\n",
+"Z2=Ixx/y2;\n",
+"L=3;\n",
+"sigc=50;\n",
+"W=sigc*Z1/L*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('W is %0.3f kN    ',W);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.16: MS16.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-16\n",
+"clc;\n",
+"clear;\n",
+"D=22;\n",
+"d=20;\n",
+"r=1;\n",
+"K=2.2;\n",
+"sigmax=130;\n",
+"sigmax=sigmax/K;\n",
+"Z=%pi*d^3/32;\n",
+"M=sigmax*Z*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('M is %0.3f Nm    ',M);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.17: MS17.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-17\n",
+"clc;\n",
+"clear;\n",
+"A=(12*2)+(12*2)+(30-4);\n",
+"B=sqrt(A/2);\n",
+"D=2*B;\n",
+"B1=12;\n",
+"D1=30;\n",
+"d=26;\n",
+"b=1;\n",
+"Z1=((B1*D1^3)-((B1-b)*d^3))/(B1*D1/2);\n",
+"Zr=B*D^2/6;\n",
+"//Let the ratio of both the sections be x\n",
+"x=Z1/Zr;\n",
+"M=30*10^6;\n",
+"sigmax=M/(Z1*10^3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Z1/Zr is %0.2f     ',x);\n",
+"  printf('\n sigmax is %0.2f N/mm^2    ',sigmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.18: MS18.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-18\n",
+"clc;\n",
+"clear;\n",
+"//Tmax=F/(I*b)*[B*t(d/2+t/2)+(b*d*d/8)];\n",
+"//T1=F/(I*b)*[B*t*(d+t)/2];\n",
+"//Tmean=T1+2/3*(Tmax-T1);\n",
+"//T=Tmax-Tmean;\n",
+"//T=F*d^2/(24*I);\n",
+"disp('Difference between maximum and mean shear stresses in the web is ,T=F*d^2/(24*I)');"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.19: MS19.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-19\n",
+"clc;\n",
+"clear;\n",
+"x1=((13*3*1.5)+(2*15*8))/(39+30);\n",
+"x2=13-x1;\n",
+"A=30+39;\n",
+"E=2*10^7;\n",
+"Iyy=995.66;\n",
+"e=54.32;\n",
+"x=x2-3;\n",
+"sigb=e*x/Iyy;\n",
+"sigd=1/69;\n",
+"sigr=sigd+sigb;\n",
+"//Let the strain be E1\n",
+"E1=800*10^-6;\n",
+"P=E1*E/sigr;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.2f kN    ',P);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.1: MS1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-1\n",
+"clc;\n",
+"clear;\n",
+"d=10;\n",
+"l=1500;\n",
+"m=12;\n",
+"h=50;\n",
+"E=210*10^3;\n",
+"sigut=450;\n",
+"A=%pi*d^2/4;\n",
+"W=m*9.81;\n",
+"sigi=W/A*(1+sqrt(1+(2*E*A*h)/(W*l)));\n",
+"deli=sigi*l/E;\n",
+"siggradual=W/A;\n",
+"sigsudden=2*siggradual;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigi is %f N/mm^2     ',sigi);\n",
+"  printf('\n deli is %f mm     ',deli);\n",
+"  printf('\n siggradual is %f N/mm^2     ',siggradual);\n",
+"\n",
+"// The difference in the answer of sigi and siggradual is due to round-off errors."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.20: MS20.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-20\n",
+"clc;\n",
+"clear;\n",
+"H=20;\n",
+"D=5;\n",
+"d=3;\n",
+"rho=21;\n",
+"sigd=rho*H;\n",
+"p=2;\n",
+"A=D*H;\n",
+"P=p*A;\n",
+"M=P*H/2;\n",
+"Z=%pi*(D^4-d^4)/(32*D);\n",
+"sigb=M/Z;\n",
+"sigmax=420+sigb;\n",
+"sigmin=420-sigb;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigmax is %0.2f kN/m^2    ',sigmax);\n",
+"  printf('\n sigmin is %0.2f kN/m^2    ',sigmin);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.21: MS21.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-21\n",
+"clc;\n",
+"clear;\n",
+"D=30;\n",
+"R=15;\n",
+"T=0.56*10^6;\n",
+"G=82*10^3;\n",
+"J=%pi*R^4/2;\n",
+"T1=T*R/J;\n",
+"l=1000;\n",
+"theta=T*l/(G*J)*180/%pi;\n",
+"r=10;\n",
+"Tr=T1*r/R;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('T1 is %0.2f N/mm^2    ',T1);\n",
+"  printf('\n theta is %0.2f deg    ',theta);\n",
+"  printf('\n Tr is %0.2f N/mm^2    ',Tr);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.22: MS22.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-22\n",
+"clc;\n",
+"clear;\n",
+"T=8*10^3;\n",
+"d=80;\n",
+"D=110;\n",
+"l=2000;\n",
+"Gst=80*10^3;\n",
+"Gcop=Gst/2;\n",
+"Js=%pi*d^4/32;\n",
+"Jc=%pi*(D^4-d^4)/32;\n",
+"//Ts=0.777*Tc\n",
+"Tc=T/1.777*10^3;\n",
+"Ts=0.777*Tc;\n",
+"Ts1=Ts/Js*d/2;\n",
+"Tc1=Tc/Jc*D/2;\n",
+"//Let tl be Angular twist per unit length\n",
+"tl=Ts*10^3/(Js*Gst)*180/%pi;\n",
+"// Let the maximum stress developed when the Torque is acting in the centre of the shaft be Ts2 & Tc2 resp. for steel and copper\n",
+"Ts2=Ts1/2;\n",
+"Tc2=Tc1/2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ts1 is %0.3f N/mm^2    ',Ts1);\n",
+"  printf('\n Tc1 is %0.1f N/mm^2    ',Tc1);\n",
+"  printf('\n theta/length is %0.3f deg/m    ',tl);\n",
+"  printf('\n Ts2 is %0.3f N/mm^2    ',Ts2);\n",
+"  printf('\n Tc2 is %0.2f N/mm^2    ',Tc2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.23: MS23.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-23\n",
+"clc;\n",
+"clear;\n",
+"D=100;\n",
+"d=75;\n",
+"r=6;\n",
+"K=1.45;\n",
+"P=20*746;\n",
+"N=400;\n",
+"w=2*%pi*N/60;\n",
+"T=P/w;\n",
+"Ts=16*T*10^3/(%pi*d^3);\n",
+"Tmax=K*Ts;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tmax is %0.3f MPa    ',Tmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.24: MS24.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-24\n",
+"clc;\n",
+"clear;\n",
+"G=84*10^3;\n",
+"T=28*10^3;\n",
+"l=1000;\n",
+"theta=%pi/180;\n",
+"J=T*l/(G*theta);\n",
+"d=(J*32/%pi)^(1/4);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm    ',d);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.25: MS25.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-25\n",
+"clc;\n",
+"clear;\n",
+"P=2*10^6;\n",
+"N=200;\n",
+"w=2*%pi*N/60;\n",
+"Tm=P/w;\n",
+"W=5*10^3*9.81;\n",
+"l=1800;\n",
+"Mmax=W*l/4;\n",
+"Tmax=1.8*Tm*10^3;\n",
+"Me=(Mmax+sqrt(Mmax^2+Tmax^2))/2;\n",
+"Te=sqrt(Mmax^2+Tmax^2);\n",
+"sig=60;\n",
+"Ts=40;\n",
+"d1=(32*Me/(%pi*sig))^(1/3);\n",
+"d2=(16*Te/(%pi*Ts))^(1/3);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm    ',d2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.26: MS26.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-26\n",
+"clc;\n",
+"clear;\n",
+"Q=4*10^3;\n",
+"P=8*10^3;\n",
+"sig=P;\n",
+"T=Q;\n",
+"p1=(sig/2+sqrt((sig/2)^2+T^2));\n",
+"p2=(sig/2-sqrt((sig/2)^2+T^2));\n",
+"sigyp=285;\n",
+"FOS=3;\n",
+"siga=sigyp/3;\n",
+"A1=p1/siga;\n",
+"d1=sqrt(4*A1/%pi);\n",
+"A2=(p1-p2)*2/(siga*2);\n",
+"d2=sqrt(4*A2/%pi);\n",
+"v=0.3;\n",
+"A3=sqrt(p1^2+p2^2-(2*v*p1*p2))/siga;\n",
+"d3=sqrt(4*A3/%pi);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d1 is %0.2f mm    ',d1);\n",
+"  printf('\n d2 is %0.1f mm    ',d2);\n",
+"  printf('\n d3 is %0.2f mm    ',d3);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.27: MS27.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-27\n",
+"clc;\n",
+"clear;\n",
+"sigx=-105;\n",
+"Txy=105;\n",
+"sigy=270;\n",
+"p1=(sigx/2+sqrt((sigx/2)^2+Txy^2));\n",
+"p2=(sigx/2-sqrt((sigx/2)^2+Txy^2));\n",
+"p3=0;\n",
+"Tmax=(p1-p2)/2;\n",
+"siga=sigy/2;\n",
+"if (Tmax<=siga) then\n",
+"    printf('The component is safe')\n",
+"end\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('\n Tmax is %0.1f MPa    ',Tmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.28: MS28.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-28\n",
+"clc;\n",
+"clear;\n",
+"rho=0.0078*9.81*10^-6;\n",
+"sigc=150;\n",
+"g=9.81;\n",
+"V=sqrt(sigc*g/rho)*10^-3;\n",
+"R=1;\n",
+"w=V/R;\n",
+"N=w*60/(2*%pi);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('N is %0.3f rpm    ',N);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.29: MS29.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-29\n",
+"clc;\n",
+"clear;\n",
+"R1=50;\n",
+"R2=200;\n",
+"N=6*10^3;\n",
+"w=2*%pi*N/60;\n",
+"v=0.28;\n",
+"rho=7800*10^-9;\n",
+"g=9810;\n",
+"k1=(3+v)/8;\n",
+"k2=(1+(3*v))/8;\n",
+"W=rho*9.81;\n",
+"x=k1*w^2*W*(R1^2+R2^2)/g;\n",
+"y=k1*w^2*W*(R1*R2)^2/g;\n",
+"y1=k1*w^2*W/g;\n",
+"z=k2*w^2*W/g;\n",
+"r=sqrt(R1*R2);\n",
+"sigrmax=x-(y/r^2)-(r^2*y1);\n",
+"r=50:200\n",
+"n=length(r);\n",
+"for i=1:n\n",
+"    sigr(i)=x-(y/r(i)^2)-(r(i)^2*y1)\n",
+"end\n",
+"\n",
+"for j=1:n\n",
+"    sigc(j)=x+(y/r(j)^2)-(r(j)^2*z)\n",
+"end\n",
+"\n",
+"plot (r,sigr);\n",
+"plot (r,sigc);\n",
+"xtitle('','r mm');\n",
+"ylabel('stress  N/mm^2');\n",
+"xgrid(2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigrmax is %0.1f MPa  ',sigrmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.2: MS2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-2\n",
+"clc;\n",
+"clear;\n",
+"d=5;\n",
+"A=%pi*d^2/4;\n",
+"l=100*10^3;\n",
+"W=600;\n",
+"E=210*10^3;\n",
+"w=0.0784*10^-3;\n",
+"del1=W*l/(A*E);\n",
+"del2=w*l^2/(2*E);\n",
+"del=del1+del2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('del is %f mm     ',del);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.30: MS30.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-30\n",
+"clc;\n",
+"clear;\n",
+"r=500;\n",
+"to=15;\n",
+"N=3500;\n",
+"w=2*%pi*N/60;\n",
+"sig=80;\n",
+"w1=0.07644*10^-3;\n",
+"g=9810;\n",
+"a=w1*w^2*r^2/(2*sig*g);\n",
+"t=to*exp(-a);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.3f mm  ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.31: MS31.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-31\n",
+"clc;\n",
+"clear;\n",
+"M=60*10^3;\n",
+"y1=((5*1*2.5)+(6*1*5.5))/(5+6);\n",
+"y2=6-y1;\n",
+"R=12;\n",
+"R1=R-y2;\n",
+"R1=10.136\n",
+"R2=11.136;\n",
+"R3=R1+6;\n",
+"B=6;\n",
+"b=1;\n",
+"A=(B*b)+((B-1)*b);\n",
+"//Let x= h^2/R^2\n",
+"x=R/A*((B*log(R2/R1))+(b*log(R3/R2)))-1;\n",
+"x=1/x;\n",
+"//Let Maximum compressive stress at B be sigB\n",
+"sigB=M/(A*R)*(1+(x*y1/(R+y1)))*10^-2;\n",
+"//Let Maximum tensile stress at A be sigA\n",
+"sigA=M/(A*R)*((y2*x/(R-y2))-1)*10^-2;\n",
+"// printing data in scilab o/p window\n",
+"  printf('sigB is %0.1f MPa     ',sigB);\n",
+"  printf('\n sigA is %0.0f MPa     ',sigA);\n",
+"  \n",
+"  //The answer to R^2/h^2 is calculated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.32: MS32.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-32\n",
+"clc;\n",
+"clear;\n",
+"R1=24;\n",
+"R2=30;\n",
+"R3=50;\n",
+"R4=54;\n",
+"F=200;\n",
+"y1=((16*4*2)+(2*20*14*4)+(24*6*27))/((16*4)+(2*20*4)+(24*6));\n",
+"y2=30-y1;\n",
+"R=24+y2;\n",
+"A=(24*6)+(2*4*20)+(4*16);\n",
+"//Let x= h^2/R^2\n",
+"x=R/A*((24*log(R2/R1))+(2*4*log(R3/R2))+(16*log(R4/R3)))-1;\n",
+"x=1/x;\n",
+"M=F*(60+R);\n",
+"sigd=F/A;\n",
+"//Let bending stress at a be sigA\n",
+"sigA=M/(A*R)*((y2*x/(R-y2))-1);\n",
+"//Let bending stress at b be sigB\n",
+"sigB=M/(A*R)*(1+(x*y1/(R+y1)));\n",
+"//Let resultant at a be Ra\n",
+"Ra=(sigA+sigd)*10;\n",
+"//Let resultant at b be Rb\n",
+"Rb=(sigB-sigd)*10;\n",
+"// printing data in scilab o/p window\n",
+"  printf('Ra is %0.2f N/mm^2     ',Ra);\n",
+"  printf('\n Rb is %0.2f N/mm^2      ',Rb);\n",
+"\n",
+"//The difference in the answers are due to rounding-off of values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.33: MS33.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-33\n",
+"clc;\n",
+"clear;\n",
+"F=50;\n",
+"B1=4;\n",
+"B2=8;\n",
+"D=12;\n",
+"y1=D/3*(B1+(2*B2))/(B1+B2);\n",
+"y2=12-y1;\n",
+"R=6+y2;\n",
+"A=(B1+B2)/2*D;\n",
+"//Let x= h^2/R^2\n",
+"a=(B1+((B2-B1)*(y1+R)/D))*log((R+y1)/(R-y2))\n",
+"x=R/(A)*(a -(B2-B1));\n",
+"x=x-1;\n",
+"x=1/x;\n",
+"KG=y2+8;\n",
+"M=F*KG;\n",
+"sigd=F/A;\n",
+"//Let bending stress at a be sigA\n",
+"sigA=M/(A*R)*(1+(x*y1/(R+y1)));\n",
+"//Let bending stress at b be sigB\n",
+"sigB=M/(A*R)*((y2*x/(R-y2))-1);\n",
+"sigA=(sigA-sigd)*10;\n",
+"sigB=(sigB+sigd)*10;\n",
+"// printing data in scilab o/p window\n",
+"  printf('sigA is %0.2f MPa     ',sigA);\n",
+"  printf('\n sigB is %0.2f MPa     ',sigB);\n",
+"  \n",
+"  //The difference in the answers are due to rounding-off of values.\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.3: MS3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-3\n",
+"clc;\n",
+"clear;\n",
+"m=25;\n",
+"v=3;\n",
+"E=210*10^3;\n",
+"KE=0.5*m*v^2;\n",
+"d=30;\n",
+"L=2000;\n",
+"A=%pi*d^2/4;\n",
+"U=A*L/(2*E);\n",
+"del=4*10^-5*A;\n",
+"W=A*del;\n",
+"sigi=sqrt(KE*10^3/(W+U));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('del is %f N/mm^2     ',sigi);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.4: MS4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-4\n",
+"clc;\n",
+"clear;\n",
+"P=40*10^3;\n",
+"A=60*18;\n",
+"sig=P/A;\n",
+"r1=12;\n",
+"b1=60;\n",
+"SCF1=1.7;\n",
+"sigmax1=sig*SCF1;\n",
+"r2=24;\n",
+"b2=60;\n",
+"SCF2=1.5;\n",
+"sigmax2=sig*SCF2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigmax1 is %f N/mm^2     ',sigmax1);\n",
+"  printf('\n sigmax2 is %f N/mm^2     ',sigmax2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.5: MS5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-5\n",
+"clc;\n",
+"clear;\n",
+"p=2.4;\n",
+"//Let axial movement of nut be La\n",
+"La=p*45/360;\n",
+"d=20;\n",
+"D=30;\n",
+"L=500;\n",
+"d1=18;\n",
+"As=%pi*d1^2/4;\n",
+"Ac=%pi*(D^2-d^2)/4;\n",
+"sigt=120/(3.543);\n",
+"sigb=1.543*sigt;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigt is %f N/mm^2     ',sigt);\n",
+"  printf('\n sigb is %f N/mm^2     ',sigb);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.6: MS6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-6\n",
+"clc;\n",
+"clear;\n",
+"delT=100;\n",
+"ab=18*10^-6;\n",
+"aa=23*10^-6;\n",
+"delta=(360*ab*delT)+(450*aa*delT);\n",
+"lc=delta-0.6;\n",
+"Ea=70*10^3;\n",
+"Eb=105*10^3;\n",
+"Aa=1600;\n",
+"Ab=1300;\n",
+"P=lc/((360/(Ab*Eb))+(450/(Aa*Ea)));\n",
+"P=P*10^-3;\n",
+"//Let the change in length be delL\n",
+"delL=(aa*450*delT)-(P*10^3*450/(Aa*Ea));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %f kN     ',P);\n",
+"  printf('\n delL is %f mm     ',delL);\n",
+"  \n",
+" // The difference in the answer of delL is due to round-off errors."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.7: MS7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-7\n",
+"clc;\n",
+"clear;\n",
+"a=23*10^-6;\n",
+"E=70*10^3;\n",
+"l=750;\n",
+"sig=35;\n",
+"delT=((sig*l/E)+0.8)/(l*a);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('delT is %f degC     ',delT);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.8: MS8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-8\n",
+"clc;\n",
+"clear;\n",
+"OA=60;\n",
+"AB=30;\n",
+"OC=-20;\n",
+"CD=-30;\n",
+"theta=30;\n",
+"angBEK=2*theta;\n",
+"OM=14;\n",
+"KM=49.5;\n",
+"p1=70;\n",
+"p2=-30;\n",
+"angBEH=-37;\n",
+"angBEI=143;\n",
+"theta1=angBEH/2;\n",
+"theta2=angBEI/2;\n",
+"Tmax=50;\n",
+"angBEL=53;\n",
+"angBEN=233;\n",
+"theta3=angBEL/2;\n",
+"theta4=angBEN/2;\n",
+"// printing data in scilab o/p window\n",
+"  printf('Stress on plane AB is %f MPa     ',OM);\n",
+"  printf('\n Stress on plane AB is %f MPa     ',KM);\n",
+"  printf('\n Principal stress p1 is %f MPa     ',p1);\n",
+"  printf('\n Principal stress p2 is %f MPa     ',p2);\n",
+"  printf('\n Principal angle theta1 is %f deg     ',theta1);\n",
+"  printf('\n Principal angle theta2 is %f deg     ',theta2);\n",
+"  printf('\n Maximum shear stress is %f MPa     ',Tmax);\n",
+"  printf('\n Direction of plane theta3 is %f deg     ',theta3);\n",
+"  printf('\n Direction of plane theta4 is %f deg     ',theta4);\n",
+"\n",
+"//The answers in the book are written in form of degrees and minutes.\n",
+"\n",
+"\n",
+"\n",
+"\n",
+""
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 3.9: MS9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 3-9\n",
+"clc;\n",
+"clear;\n",
+"E=200*10^3;\n",
+"v=0.29;\n",
+"E1=720*10^-6;\n",
+"E2=560*10^-6;\n",
+"p1=121.76;\n",
+"p2=-76.69;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('p1 is %f MN/mm^2     ',p1);\n",
+"  printf('\n p2 is %f MN/mm^2     ',p2);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/30-CHAIN_DRIVE.ipynb b/Machine_Design_by_U_C_Jindal/30-CHAIN_DRIVE.ipynb
new file mode 100644
index 0000000..2174ae8
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/30-CHAIN_DRIVE.ipynb
@@ -0,0 +1,190 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 30: CHAIN DRIVE"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 30.1: CD1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 30-1\n",
+"clc;\n",
+"clear;\n",
+"n1=17;\n",
+"n2=51;\n",
+"C=300;\n",
+"p=9.52;\n",
+"Ln=(2*C/p)+((n1+n2)/2)+((((n2-n1)/(2*%pi))^2)*(p/C));\n",
+"x=(Ln-((n2+n1)/(2)))^2;\n",
+"y=8*(((n2-n1)/(2*%pi))^2);\n",
+"z=Ln-((n1+n2)/2);\n",
+"C=(p/4)*(z+(sqrt(x-y)))\n",
+"  // printing data in scilab o/p window\n",
+"  printf('C is %0.2f mm ',C);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 30.2: CD2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 30-2\n",
+"clc;\n",
+"clear;\n",
+"G=4;\n",
+"n1=17;\n",
+"n2=n1*G;\n",
+"N1=2300;\n",
+"Kc=1.2; //from table 30-2\n",
+"p=12.7; //fom table 30-1\n",
+"D1=p*n1;\n",
+"D2=p*n2;\n",
+"phi=2*10.6;\n",
+"x=tan(phi/2); //phi/2 = 10.6deg, from table 30-3\n",
+"Da1=(p/x)+(0.6*p);\n",
+"Da2=(p/x*4)+(0.6*p);\n",
+"Cmin=Kc*((Da1+Da2)/2);\n",
+"Ln1=(2*Cmin/p)+((n1+n2)/2)+((((n2-n1)/(2*%pi))^2)*(p/Cmin));\n",
+"Ln1=80;\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ln is %0.0f  ',Ln1);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 30.3: CD3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 30-3\n",
+"clc;\n",
+"clear;\n",
+"N1=1000;\n",
+"N2=500;\n",
+"P=2.03*10^3; //from table 30-8\n",
+"K1=1.26;\n",
+"Ks=1;\n",
+"//let Pc be the power transmitting capacity of the chain\n",
+"Pc=P*K1/Ks;\n",
+"p=9.52;\n",
+"n1=21;\n",
+"n2=42;\n",
+"V=n1*p*N1/(60*10^3);\n",
+"//Let the chain tension be T\n",
+"T=Pc/V;\n",
+"//Let the breaking load be BL\n",
+"BL=10700;\n",
+"FOS=BL/T;\n",
+"C=50*p;\n",
+"Ln=(2*C/p)+((n1+n2)/2)+((((n2-n1)/(2*%pi))^2)*(p/C));\n",
+"L=Ln*p;\n",
+"Pc=Pc*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Pc is %0.2f KW  ',Pc);\n",
+"  printf('\n V is %0.3f m/s  ',V);\n",
+"  printf('\n T is %0.1f N  ',T);\n",
+"  printf('\n FOS is %0.2f   ',FOS);\n",
+"  printf('\n L is %0.2f mm  ',L);\n",
+"\n",
+"//The difference in the value of L and T is due to rounding-off the values."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 30.4: CD4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 30-5\n",
+"clc;\n",
+"clear;\n",
+"G=2;\n",
+"P=5000;\n",
+"Ks=1.7;\n",
+"Pd=P*Ks;\n",
+"K2=1.7;\n",
+"p=15.88;\n",
+"n1=17;\n",
+"n2=n1*G;\n",
+"D1=n1*p;\n",
+"D2=n2*p;\n",
+"C=40*p;\n",
+"Ln=(2*C/p)+((n1+n2)/2)+((((n2-n1)/(2*%pi))^2)*(p/C));\n",
+"L=Ln*p;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('L is %0.2f mm  ',L);\n",
+"//The difference in the value of L is due to rounding-off the values."
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/31-SEALS_PACKING_AND_GASKETS.ipynb b/Machine_Design_by_U_C_Jindal/31-SEALS_PACKING_AND_GASKETS.ipynb
new file mode 100644
index 0000000..d40588c
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/31-SEALS_PACKING_AND_GASKETS.ipynb
@@ -0,0 +1,170 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 31: SEALS PACKING AND GASKETS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 31.1: SPG1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 31-1\n",
+"clc;\n",
+"clear;\n",
+"d=18;\n",
+"lg=25+25;\n",
+"Eb=210*10^3;\n",
+"Ecl=90*10^3;\n",
+"A=%pi*d^2/4;\n",
+"kb=A*Eb/lg;\n",
+"x=(5*(lg+(0.5*d))/(lg+(2.5*d)));\n",
+"km=%pi*Ecl*d/(2*log(x));\n",
+"C=kb/(kb+km);\n",
+"sigp=600;\n",
+"At=192;\n",
+"Pi=0.75*sigp*At;\n",
+"F=200;\n",
+"C=0.322;\n",
+"Pb=F*C*10^3;\n",
+"FOS=2;\n",
+"W=At*sigp;\n",
+"N=Pb*FOS/(W-Pi);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('N is %0.2f      ',N);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 31.2: SPG2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 31-2\n",
+"clc;\n",
+"clear;\n",
+"d=16;\n",
+"D=1.5*d;\n",
+"t=20;\n",
+"tg=4;\n",
+"//Let Gasket diameter in compression zone be d1\n",
+"d1=D+(2*t)+tg;\n",
+"lg=40;\n",
+"E=207*10^3;\n",
+"kb=%pi*d^2*E/(lg*4);\n",
+"Ecl=90*10^3;\n",
+"x=(5*(lg+(0.5*d))/(lg+(2.5*d)));\n",
+"kp=%pi*Ecl*d/(2*log(x));\n",
+"Ag=%pi*(d1^2-d^2)/4;\n",
+"Eg=480;\n",
+"kg=Ag*Eg/tg;\n",
+"km=kg*kp/(kg+kp);\n",
+"C=kb/(kb+km);\n",
+"At=157;\n",
+"sigp=600;\n",
+"Pi=0.75*At*sigp/2;\n",
+"FOS=2;\n",
+"Pf=At*sigp/FOS;\n",
+"W=Pf-Pi;\n",
+"P=W/C;\n",
+"N=5;\n",
+"F=P*N;\n",
+"p=F*4/(%pi*120^2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('p is %0.3f N/mm^2     ',p);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 31.3: SPG3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 31-3\n",
+"clc;\n",
+"clear;\n",
+"sigp=600;\n",
+"FOS=3;\n",
+"siga=sigp/FOS;\n",
+"d=16;\n",
+"D=1.5*d+60;\n",
+"//Let Gasket diameter in compression zone be d1\n",
+"d1=(300-160)/2;\n",
+"//Let compressive stress in gasket for leak proof joint be sigl\n",
+"sigl=12;\n",
+"At=[1 157; 2 192; 3 245]\n",
+"d=[1 16; 2 18; 3 20]\n",
+"\n",
+"n=3;\n",
+"for (i=1:n)\n",
+"    Pi(i,2)=At(i,2)*d(i,2)\n",
+"    Pc(i,2)=3*%pi*(d1^2-d(i,2)^2)\n",
+"    if (Pi(i,2)>=Pc(i,2)) then\n",
+"    printf('The Design is safe')\n",
+"end\n",
+"end\n",
+"\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.0f mm     ',d(i,2));"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/4-MANUFACTURING_CONSIDERATIONS.ipynb b/Machine_Design_by_U_C_Jindal/4-MANUFACTURING_CONSIDERATIONS.ipynb
new file mode 100644
index 0000000..a8dd8fb
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/4-MANUFACTURING_CONSIDERATIONS.ipynb
@@ -0,0 +1,224 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 4: MANUFACTURING CONSIDERATIONS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 4.1: MF1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 4-1\n",
+"clc;\n",
+"clear;\n",
+"d=70;\n",
+"dmin=50;\n",
+"dmax=80;\n",
+"D=sqrt(dmin*dmax);\n",
+"D=63;\n",
+"i=0.458*(D^(1/3))+(0.001*D);\n",
+"\n",
+"//standard tolerance for H8 is ST1\n",
+"ST1=25*i;\n",
+"ST1=ST1*10^-3;\n",
+"//standard tolerance of shaft for grade g7 is ST2\n",
+"ST2=16*i;\n",
+"ST2=ST2*10^-3;\n",
+"es=-(2.5*(D^0.333));\n",
+"es=es*10^-3;\n",
+"ei=es-ST2;\n",
+"//Lower limit for hole is LLH\n",
+"//Upper limit for hole is ULH\n",
+"//Upper limit for shaft is ULS\n",
+"//Lower limit for shaft is LLS\n",
+"LLH=d;\n",
+"ULH=LLH+ST1;\n",
+"ULS=LLH+es;\n",
+"LLS=ULS-ST2;\n",
+"//Maximum clearance is Cmax\n",
+"//minimum clearance is Cmin\n",
+"Cmax=ULH-LLS;\n",
+"Cmin=LLH-ULS;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('LLH is %0.1f mm ',LLH);\n",
+"  printf('\n ULH is %0.3f mm ',ULH);\n",
+"  printf('\n ULS is %0.2f mm ',ULS);\n",
+"  printf('\n LLS is %0.2f mm ',LLS);\n",
+"  printf('\n Cmax is %0.3f mm ',Cmax);\n",
+"  printf('\n Cmin is %0.3f mm ',Cmin);\n",
+" "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 4.2: MF2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 4-2\n",
+"clc;\n",
+"clear;\n",
+"d=25;\n",
+"//Lower limit for hole is LLH\n",
+"//Upper limit for hole is ULH\n",
+"//Upper limit for shaft is ULS\n",
+"//Lower limit for shaft is LLS\n",
+"ULH=d+0.021;\n",
+"LLH=d+0;\n",
+"ULS=d+0.041;\n",
+"LLS=d+0.028;\n",
+"//Maximum interference is Cmax\n",
+"//minimum interference is Cmin\n",
+"Cmax=ULS-LLH;\n",
+"Cmin=LLS-ULH;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Cmax is %0.3f mm ',Cmax);\n",
+"  printf('\n Cmin is %0.3f mm ',Cmin);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 4.3: MF3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 4-3\n",
+"clc;\n",
+"clear;\n",
+"d=50;\n",
+"Es=0.039;\n",
+"Ei=0;\n",
+"es=-9*10^-3;\n",
+"ei=-34*10^-3;\n",
+"//Shaft dia is D\n",
+"D=d+es;\n",
+"//Lower limit for hole is LLH\n",
+"//Upper limit for hole is ULH\n",
+"//Upper limit for shaft is ULS\n",
+"//Lower limit for shaft is LLS\n",
+"ULH=d+Es;\n",
+"LLH=d+Ei;\n",
+"ULS=d+es;\n",
+"LLS=d+ei;\n",
+"//Maximum interference is Cmax\n",
+"//minimum interference is Cmin\n",
+"Cmax=ULH-LLS;\n",
+"Cmin=LLH-ULS;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('ULH is %0.3f mm ',ULH);\n",
+"  printf('\n LLH is %0.3f mm ',LLH);\n",
+"  printf('\n ULS is %0.3f mm ',ULS);\n",
+"  printf('\n LLS is %0.3f mm ',LLS);\n",
+"  printf('\n Cmax is %0.3f mm ',Cmax);\n",
+"  printf('\n Cmin is %0.3f mm ',Cmin);\n",
+"  disp('Therefore, H8g7 is easy running fit');"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 4.4: MF4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 4-3\n",
+"clc;\n",
+"clear;\n",
+"d=30;\n",
+"Es=0.025;\n",
+"Ei=0;\n",
+"es=11*10^-3;\n",
+"ei=-5*10^-3;\n",
+"//Shaft dia is D\n",
+"D=d+es;\n",
+"//Lower limit for hole is LLH\n",
+"//Upper limit for hole is ULH\n",
+"//Upper limit for shaft is ULS\n",
+"//Lower limit for shaft is LLS\n",
+"ULH=d+Es;\n",
+"LLH=d+Ei;\n",
+"ULS=d+es;\n",
+"LLS=d+ei;\n",
+"//Maximum interference is Cmax\n",
+"//minimum interference is Cmin\n",
+"Cmax=ULH-LLS;\n",
+"Cmin=ULS-LLH;;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('ULH is %0.3f mm ',ULH);\n",
+"  printf('\n LLH is %0.3f mm ',LLH);\n",
+"  printf('\n ULS is %0.3f mm ',ULS);\n",
+"  printf('\n LLS is %0.3f mm ',LLS);\n",
+"  printf('\n Cmax is %0.3f mm ',Cmax);\n",
+"  printf('\n Cmin is %0.3f mm ',Cmin);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/5-INTRODUCTION_TO_PRESSURE_VESSELS.ipynb b/Machine_Design_by_U_C_Jindal/5-INTRODUCTION_TO_PRESSURE_VESSELS.ipynb
new file mode 100644
index 0000000..a357bfc
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/5-INTRODUCTION_TO_PRESSURE_VESSELS.ipynb
@@ -0,0 +1,230 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 5: INTRODUCTION TO PRESSURE VESSELS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 5.1: IPV5_1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 5-1\n",
+"clc;\n",
+"clear;\n",
+"p=2;\n",
+"Rm=220;\n",
+"//tensile hoop or circumferential stress= sigt\n",
+"sigr=-2;\n",
+"//sigt=(p*Rm)/t;\n",
+"Sa=230/2;\n",
+"//t1=thickness according to maximum principal stress theory\n",
+"//t2=thickness according to maximum shear stress theory\n",
+"t1=(p*Rm)/Sa;\n",
+"t2=(p*Rm)/(Sa+sigr);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t1 is %0.2f mm ',t1);\n",
+"  printf('\n t2 is %0.3f mm ',t2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 5.2: IPV5_2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 5-2\n",
+"clc;\n",
+"clear;\n",
+"//Elastic limit=sige\n",
+"sige=310;\n",
+"//inside diameter=di\n",
+"di=300;\n",
+"p=1.8;\n",
+"FOS=2;\n",
+"//design stress=sigd;\n",
+"sigd=sige/2;\n",
+"c=0.162;\n",
+"d=380;\n",
+"//cover plate thickness=t;\n",
+"t=d*sqrt(c*p/sigd);\n",
+"t=17;\n",
+"M=di*p*t/4;\n",
+"\n",
+"z=(1/6)*1*t^2;\n",
+"//bending stress=sigb;\n",
+"sigb=M/z;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t is %0.1fmm ',t);\n",
+"  printf('\n M is %0.1fmm ',M);\n",
+"  printf('\n sigb is %0.1fmm ',sigb);\n",
+"  if (sigb<=sigd) then\n",
+"    disp ('sigb is below allowable sigd.')\n",
+"end"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 5.3: IPV5_3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 5-3\n",
+"clc;\n",
+"clear;\n",
+"sige=220;\n",
+"v=0.29;\n",
+"Ri=175;\n",
+"FOS=3;\n",
+"Sa=sige/3;\n",
+"p=10;\n",
+"//t1=thickness according to maximum principal stress theory\n",
+"//t2=thickness according to maximum shear stress theory\n",
+"x=Sa+(p*(1-(2*v)));\n",
+"y=Sa-(p*(1+v));\n",
+"t1=(sqrt(x/y)-1)*Ri;\n",
+"t1=24;\n",
+"//t1=((sqrt((Sa+(p*(1-(2*v)))))/(Sa-(p*(1+v))))-1)*Ri;\n",
+"t2=Ri*((sqrt(Sa/(Sa-(2*p))))-1);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('t1 is %0.1fmm ',t1);\n",
+"  printf('\n t2 is %0.3fmm ',t2);\n",
+"  \n",
+"  //The answer to t2 is not calculated in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 5.4: IPV5_4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 5-4\n",
+"clc;\n",
+"clear;\n",
+"p=16;\n",
+"Ri=250;\n",
+"//Yield strength =sigy;\n",
+"sigy=330;\n",
+"v=0.3;\n",
+"FOS=3;\n",
+"Sa=sigy/3;\n",
+"t=Ri*((sqrt(Sa/(Sa-(2*p))))-1);\n",
+"t=50;\n",
+"  // printing data in scilab o/p window\n",
+"   printf('t is %0.1fmm ',t);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 5.5: IPV5_5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 5-5\n",
+"clc;\n",
+"clear;\n",
+"d=15;\n",
+"Eg=480;\n",
+"t=3;\n",
+"//flange thickness=ft;\n",
+"ft=12;\n",
+"A=%pi*d^2/4;\n",
+"l=d+t+(ft/2);\n",
+"E=210;\n",
+"kb=A*E/l;\n",
+"//effective area of gasket=Ag;\n",
+"Ag=%pi*(((ft+t+d)^2)-(d^2))/4;\n",
+"kg=Ag*Eg/t;\n",
+"// printing data in scilab o/p window\n",
+"   printf('kb is %0.3f N/mm ',kb);\n",
+"kb=kb*10^-3;\n",
+"kg=kg*10^-3;\n",
+"if (kb<=kg) then\n",
+"    printf('\n The combines stiffness of bolt and gasket is %0.3f kN/mm',kg)\n",
+"end\n",
+"\n",
+"//The difference in the value of kb is due to rounding-off the value of A \n",
+"   \n",
+"   "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/6-LEVERS.ipynb b/Machine_Design_by_U_C_Jindal/6-LEVERS.ipynb
new file mode 100644
index 0000000..693956c
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/6-LEVERS.ipynb
@@ -0,0 +1,329 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 6: LEVERS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.1: L1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-1\n",
+"clc;\n",
+"clear;\n",
+"del=10;\n",
+"k=500;\n",
+"W=k*del;\n",
+"//Let load arm be l1\n",
+"l1=200;\n",
+"//Let effort arm be l2\n",
+"l2=500;\n",
+"P=W*l1/l2;\n",
+"Ro=sqrt(W^2+P^2);\n",
+"Ta=40;\n",
+"d=sqrt(Ro*4/(2*%pi*Ta));\n",
+"d=10;\n",
+"pb=10;\n",
+"d1=sqrt(Ro/(pb*1.5));\n",
+"d1=20;\n",
+"l=1.5*d;\n",
+"t=10;\n",
+"T=Ro*4/(2*%pi*d1^2);\n",
+"M=(Ro/2*(l/2+t/3))-(Ro/2*l/4);\n",
+"sigb=32*M/(%pi*d1^3);\n",
+"sigmax=(sigb/2)+sqrt((sigb/2)^2+T^2);\n",
+"P=Ro/(l*d1);\n",
+"D=2*d1;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d1 is %0.1f mm     ',d1);\n",
+"  printf('\n D is %0.1f mm     ',D);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.2: L2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-2\n",
+"clc;\n",
+"clear;\n",
+"d1=80;\n",
+"p=0.981;\n",
+"Ta=40;\n",
+"siga=80;\n",
+"pa=15;\n",
+"W=%pi*(d1^2)*p/4;\n",
+"P=W/8;\n",
+"Ws=W-P;\n",
+"d=sqrt(W*4/(%pi*2*Ta));\n",
+"l=1.5*d;\n",
+"D=2*d;\n",
+"T=W/(2*%pi*pa^2/4);\n",
+"M1=P*(700-87.5-(D/2));\n",
+"h=50;\n",
+"b=h/4;\n",
+"Z=b*h^2/6;\n",
+"sigb=M1/Z;\n",
+"pmax=80;\n",
+"T=2465.6/h^2;\n",
+"pmax=(sigb/2)+sqrt((sigb/2)^2+T^2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('h is %0.2f mm     ',h);\n",
+"  printf('\n pmax is %0.2f MPa     ',pmax);\n",
+"  \n",
+"  //The difference in the value of pmax is due to rounding-off the digits."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.3: L3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-3\n",
+"clc;\n",
+"clear;\n",
+"P=((4*360)+(2*360))/900;\n",
+"Fv=4-2;\n",
+"Fh=P;\n",
+"Fr=sqrt(Fv^2+Fh^2);\n",
+"P1=4*0.36/0.9;\n",
+"Rf=sqrt(4^2+1.6^2);\n",
+"d=sqrt(Rf*10^3/(15*1.25));\n",
+"d=16;\n",
+"l=1.25*d;\n",
+"T=Rf*10^3*4/(2*%pi*d^2);\n",
+"D=2*d;\n",
+"M1=Rf*10^3*(360-(D/2));\n",
+"pa=15;\n",
+"h=80;\n",
+"b=h/4;\n",
+"Z=b*h^2/6;\n",
+"sigb=M1/Z;\n",
+"T=4310/(b*h);\n",
+"pmax=(sigb/2)+sqrt((sigb/2)^2+T^2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.1f KN     ',P);\n",
+"  printf('\n pmax is %0.2f MPa     ',pmax);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.4: L4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-4\n",
+"clc;\n",
+"clear;\n",
+"l=360;\n",
+"P=400;\n",
+"Mh=2*P*l/3;\n",
+"sigb=50;\n",
+"l1=60;\n",
+"d=(Mh*32/(%pi*l1))^(1/3);\n",
+"d=30;\n",
+"L=420;\n",
+"siga=60;\n",
+"H=20;\n",
+"B=H/3;\n",
+"Mx=P*(L-H/2);\n",
+"Tx=2*P*l/3;\n",
+"sigb1=Mx*18/H^3;\n",
+"Td=P/(B*H);\n",
+"Tr=17.17*Tx/H^4;\n",
+"T=Tr+Td;\n",
+"sigmax=(sigb1/2)+sqrt((sigb1/2)^2+T^2);\n",
+"Tmax=sqrt((sigb1/2)^2+T^2);\n",
+"T=P*L;\n",
+"M=P*(l1+(2/3*l));\n",
+"Te=sqrt(T^2+M^2);\n",
+"Ta=40;\n",
+"D=(Te*16/(%pi*Ta))^(1/3);\n",
+"D=30; //Rounding off to nearest whole number\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm     ',d);\n",
+"  printf('\n D is %0.1f mm     ',D);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.5: L5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-5\n",
+"clc;\n",
+"clear;\n",
+"l2=300;\n",
+"l=450;\n",
+"P=400;\n",
+"Mx=2*P*l2/3;\n",
+"siga=80;\n",
+"dh=(Mx*32/(%pi*siga))^(1/3);\n",
+"dh=22;\n",
+"L=(2*l2/3)+l;\n",
+"T=P*L;\n",
+"Ta=40;\n",
+"d=(T*16/(%pi*Ta))^(1/3);\n",
+"d=35;\n",
+"d1=1.6*d;\n",
+"Th=T*16*d1/(%pi*(d1^4-d^4));\n",
+"l1=1.5*d;\n",
+"My=P*(L-(d1/2));\n",
+"B=dh;\n",
+"H=sqrt(3.66*75);\n",
+"H=30;\n",
+"Mz=P*l1/2;\n",
+"Te=sqrt(T^2+Mz^2);\n",
+"d2=(Te*16/(%pi*Ta))^(1/3);\n",
+"d2=32;\n",
+"b=d/4;\n",
+"b=9; //Rounding off to nearest whole number\n",
+"t=d/6;\n",
+"t=6; //Rounding off to nearest whole number\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f  mm     ',d);\n",
+"  printf('\n dh is %0.1f mm     ',dh);\n",
+"  printf('\n d1 is %0.1f mm     ',d1);\n",
+"  printf('\n l1 is %0.1f mm     ',l1);\n",
+"  printf('\n d2 is %0.1f mm     ',d2);\n",
+"  printf('\n b  is %0.1f  mm     ',b);\n",
+"  printf('\n t  is %0.1f  mm     ',t);\n",
+"  "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 6.6: L6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 6-6\n",
+"clc;\n",
+"clear;\n",
+"L=450;\n",
+"P=700;\n",
+"T=P*L;\n",
+"Ta=50;\n",
+"d=(T*16/(%pi*Ta))^(1/3);\n",
+"d=32;\n",
+"d1=1.6*d;\n",
+"d1=52; //Rounding off to nearest whole number\n",
+"l1=1.25*d;\n",
+"My=P*(L-d1/2);\n",
+"sigb=65;\n",
+"H=(My*18/sigb)^(1/3);\n",
+"H=45;\n",
+"B=H/3;\n",
+"T1=P/(B*H);\n",
+"sigmax=(sigb/2)+sqrt((sigb/2)^2+T^2);\n",
+"Mx=P*l1/2;\n",
+"Te=sqrt((T)^2+(Mx^2));\n",
+"d2=(Te*16/(%pi*Ta))^(1/3);\n",
+"d2=d2+6;\n",
+"d2=38; //Rounding off to nearest whole number\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f  mm     ',d);\n",
+"  printf('\n d1 is %0.1f mm     ',d1);\n",
+"  printf('\n l1 is %0.1f mm     ',l1);\n",
+"  printf('\n B  is %0.1f mm     ',B);\n",
+"  printf('\n H  is %0.1f mm     ',H);\n",
+"  printf('\n d2 is %0.1f mm     ',d2);\n",
+"  "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/7-STRUTS_AND_COLUMNS.ipynb b/Machine_Design_by_U_C_Jindal/7-STRUTS_AND_COLUMNS.ipynb
new file mode 100644
index 0000000..b6ae9b5
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/7-STRUTS_AND_COLUMNS.ipynb
@@ -0,0 +1,282 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 7: STRUTS AND COLUMNS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.1: SC1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-1\n",
+"clc;\n",
+"clear;\n",
+"sigc=550;\n",
+"FOS=4;\n",
+"sigw=sigc/FOS;\n",
+"l=4000;\n",
+"le=l/2;\n",
+"A=%pi*(1-0.7^2)/4;\n",
+"K=(1+0.7^2)/16;\n",
+"Pr=800*10^3;\n",
+"a=1/1600;\n",
+"D=130; //Rounding off to nearest whole number\n",
+"d=D*0.7;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('D is %0.1f mm     ',D);\n",
+"  printf('\n d is %0.1f mm     ',d);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.2: SC2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-2\n",
+"clc;\n",
+"clear;\n",
+"l=500;\n",
+"E=70*10^3;\n",
+"P=20*10^3;\n",
+"FOS=2;\n",
+"d=P*2*12*4*l^2/((%pi)^2*E);\n",
+"d=(sqrt(8)*d)^0.25;\n",
+"b=d/sqrt(8);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.2f mm     ',d);\n",
+"  printf('\n b is %0.2f mm     ',b);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.3: SC3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-3\n",
+"clc;\n",
+"clear;\n",
+"Ixx=(2*1696.6)+115.4;\n",
+"Iyy=1696.6+(2*115.4)+(2*25.27*10.27^2);\n",
+"A=3*25.27;\n",
+"Kmin=sqrt(Ixx/75.81);\n",
+"L=600;\n",
+"k=L/Kmin;\n",
+"sigc=110;\n",
+"c=1/200;\n",
+"sigw=sigc*(1-(c*k));\n",
+"Pw=sigw*A;\n",
+"a=1/7500;\n",
+"sigc1=320;\n",
+"Pr=(sigc1*A)/(1+(a*(L/Kmin)^2));\n",
+"FOS=Pr/Pw;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('FOS is %0.2f      ',FOS);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.4: SC4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-4\n",
+"clc;\n",
+"clear;\n",
+"Iyy=193.4+(2*1.2*1.5^3/12);\n",
+"E=200*10^3;\n",
+"l=500;\n",
+"Pe=(%pi^2)*E*Iyy*10^5/(l^2);\n",
+"A=35.53+(2*1.2*15);\n",
+"sige=Pe/7530;\n",
+"k=sqrt(Iyy/A);\n",
+"xc=75;\n",
+"sig=80;\n",
+"sigo=20.875;\n",
+"A=A*100;\n",
+"P=sigo*A;\n",
+"P=P*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.1f kN     ',P);\n",
+"  \n",
+"  //The difference in the value of P is due to rounding-off the digits."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.5: SC5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-5\n",
+"clc;\n",
+"clear;\n",
+"sigc=330;\n",
+"a=1/7500;\n",
+"t=4;\n",
+"A=14.5*t^2;\n",
+"l=300;\n",
+"Kx=sqrt(1.4626*t^2);\n",
+"Pr=sigc*A/(1+(a*(l/Kx)^2));\n",
+"FOS=2;\n",
+"P=Pr/FOS*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.4f KN     ',P);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.6: SC6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-6\n",
+"clc;\n",
+"clear;\n",
+"P=1500;\n",
+"FOS=2;\n",
+"Pd=FOS*P;\n",
+"l=280;\n",
+"E=207*10^3;\n",
+"I=Pd*l^2/(%pi^2*E);\n",
+"D=(64*I/(%pi*(1-0.8^4)))^(1/4);\n",
+"D=8;\n",
+"d=6.4;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('D is %0.1f mm     ',D);\n",
+"  printf('\n d is %0.1f mm     ',d);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 7.7: SC7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 7-7\n",
+"clc;\n",
+"clear;\n",
+"D=500;\n",
+"p=0.3;\n",
+"E=208*10^3;\n",
+"sigc=320;\n",
+"a=1/7500;\n",
+"l=2000;\n",
+"le=l/2;\n",
+"W=%pi*D^2*p/4;\n",
+"FOS=4;\n",
+"Wd=W*FOS;\n",
+"I=Wd*l^2/(%pi^2*E);\n",
+"d=(64*I/%pi)^(1/4);\n",
+"A=%pi*d^2/4;\n",
+"k=d/4;\n",
+"d=45; //Rounding off to nearest whole number\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm     ',d);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/8-SPRINGS.ipynb b/Machine_Design_by_U_C_Jindal/8-SPRINGS.ipynb
new file mode 100644
index 0000000..7c623f3
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/8-SPRINGS.ipynb
@@ -0,0 +1,711 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 8: SPRINGS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.10: S8_10.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-10\n",
+"clc;\n",
+"clear;\n",
+"A=1783;\n",
+"m=0.190;\n",
+"d=1.5;\n",
+"D=15;\n",
+"M=300;\n",
+"E=20800;\n",
+"k=30;\n",
+"//sigult= ultimate strength of the material\n",
+"// sigy= yield strength of the material\n",
+"sigult=A/(d^m);\n",
+"sigy=0.7*sigult;\n",
+"//siga= allowable yield strength of the material\n",
+"siga=sigy/2;\n",
+"C=D/d;\n",
+"Ki=(4*(C^2)-C-1)/(4*C*(C-1));\n",
+"Z=%pi*(d^3)/32;\n",
+"//sigb=bending strength of the material;\n",
+"sigb=Ki*M/Z;\n",
+"while (sigb>=siga) \n",
+"    d=d+0.15;\n",
+"    D=15;\n",
+"    C=D/d;\n",
+"    sigult=A/(d^m);\n",
+"sigy=0.7*sigult;\n",
+"siga=sigy/2;\n",
+"Ki=(4*(C^2)-C-1)/(4*C*(C-1));\n",
+"Z=%pi*(d^3)/32;\n",
+"sigb=Ki*M/Z;\n",
+"end\n",
+"d=2;// rounding off the value of the diameter.\n",
+"D;\n",
+"Na=(d^4)*E/(64*D*k);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1f mm ',d);\n",
+"  printf('\n D is %0.1f mm ',D);\n",
+"  printf('\n Na is %0.2f mm ',Na);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.11: S8_11.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-11\n",
+"clc;\n",
+"clear;\n",
+"L=1180;\n",
+"W=40*(10^3);\n",
+"Nf=2;\n",
+"Ng=8;\n",
+"E=207*(10^3);\n",
+"//sigut is ultimate strength\n",
+"sigut=1400;\n",
+"FOS=2;\n",
+"//siga= allowable yield strength of the material\n",
+"siga=1400/2;\n",
+"//sigbf=bending strength in full length\n",
+"sigbf=700;\n",
+"b=75;\n",
+"t=((4.5*W*L)/(((3*Nf)+(2*Ng))*sigbf))^(0.5);\n",
+"t=14;\n",
+"I=(Nf*b*(t^3))/12;\n",
+"Wf=(3*Nf*W)/((3*Nf)+(2*Ng));\n",
+"del=(Wf*(L^3))/(48*E*I);\n",
+"\n",
+"\n",
+" // printing data in scilab o/p window\n",
+" printf('t is %0.0f mm ',t);\n",
+" printf('\n Wf is %0.0f N ',Wf);\n",
+" printf('\n I is %0.0f mm^4 ',I);\n",
+" printf('\n del is %0.1f mm ',del);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.12: S8_12A.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-12A\n",
+"clc;\n",
+"clear;\n",
+"W=80000;\n",
+"sigbfr=500;\n",
+"L=1100;\n",
+"Nf=3;\n",
+"Ng=10;\n",
+"N=Nf+Ng;\n",
+"t=((1.5*W*L)/(N*6*sigbfr))^(1/3);\n",
+"t=15;\n",
+"b=6*t;\n",
+"E=207*10^3;\n",
+"deli=(W*(L^3))/(8*E*N*b*(t^3));\n",
+"Wi=(W*Nf*Ng)/(N*((3*Nf)+(2*Ng)));\n",
+"\n",
+"\n",
+" // printing data in scilab o/p window\n",
+" printf('t is %0.1f mm ',t);\n",
+" printf('\n deli is %0.1f mm ',deli);\n",
+" printf('\n Wi is %0.0f N ',Wi);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.13: S8_13.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-13\n",
+"clc;\n",
+"clear;\n",
+"//ultimate strength=sigut\n",
+"sigut=1500;\n",
+"C=7;\n",
+"d=3;\n",
+"D=C*d;\n",
+"Ks=1+(0.5/C);\n",
+"Kw=(((4*C)-1)/((4*C)-4))+(0.615/C);\n",
+"Pmax=120;\n",
+"Pmin=40;\n",
+"Pm=80;\n",
+"Tm=(Ks*8*Pm*D)/(%pi*(d^3));\n",
+"Ta=(Kw*8*Pmin*D)/(%pi*(d^3));\n",
+"Tse=0.22*sigut;\n",
+"Tys=0.45*sigut;\n",
+"x=(Tys-(0.5*Tse))/(0.5*Tse);\n",
+"y=((x)*Ta)+Tm;\n",
+"FOS=(Tys/y);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tm is %0.2f MPa ',Tm);\n",
+"  printf('\n Ta is %0.1f MPa ',Ta);\n",
+"  printf('\n FOS is %0.3f ',FOS);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.14: S8_14.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-14\n",
+"clc;\n",
+"clear;\n",
+"Tse=360;\n",
+"Tys=660;\n",
+"d=25;\n",
+"P=0.03;\n",
+"m=40;\n",
+"Pmin=((%pi*(d^2)*P)/4)+(m*9.81/1000);\n",
+"k=6;\n",
+"//Additional load= Padd=k*further compression in spring\n",
+"Padd=k*10;\n",
+"Pmax=Padd+Pmin;\n",
+"Pm=(Pmax+Pmin)/2;\n",
+"Pa=(Pmax-Pmin)/2;\n",
+"d=2;\n",
+"D=12;\n",
+"C=6;\n",
+"Ks=1+(0.5/C);\n",
+"Ks=1.083;\n",
+"Kw=(((4*C)-1)/((4*C)-4))+(0.615/C);\n",
+"Ta=(Kw*8*Pa*D)/(%pi*(d^3));\n",
+"Tm=(Ks*8*Pm*D)/(%pi*(d^3));\n",
+"x=(Tys-(0.5*Tse))/(0.5*Tse);\n",
+"y=((x)*Ta)+Tm;\n",
+"FOS=(Tys/y);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tm is %0.2f MPa ',Tm);\n",
+"  printf('\n Ta is %0.3f MPa ',Ta);\n",
+"  printf('\n FOS is %0.2f ',FOS);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.1: S8_1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-1\n",
+"clc;\n",
+"clear;\n",
+"d=5;\n",
+"D=30;\n",
+"G=84*(10^3);\n",
+"Na=15;\n",
+"//Axial Load W\n",
+"W=300;\n",
+"//Spring index C\n",
+"C=30/5;\n",
+"//Shear stress Augmentation factor Ks\n",
+"Ks=((2*C)+1)/(2*C);\n",
+"//Wahl's factor Kw\n",
+"Kw=(((4*C)-1)/((4*C)-4))+(0.615/C);\n",
+"//Curvature correction factor Kc\n",
+"Kc=Kw/Ks;\n",
+"//Spring stiffness k\n",
+"k=(G*(d^4))/(8*(D^3)*Na);\n",
+"//Axial deflection delta\n",
+"delta=W/k;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('Ks is %0.4f ',Ks);\n",
+"printf('\n Kw is %0.4f ',Kw);\n",
+"printf('\n Kc is %0.3f ',Kc);\n",
+"printf('\n The Spring Stiffness is %0.1f N/mm',k);\n",
+"printf('\n The Axial deflection is %0.3f mm',delta);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.2: S8_2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-2\n",
+"clc;\n",
+"clear;\n",
+"W=196.2;\n",
+"lenthofscale=50;\n",
+"k=196.2/50;\n",
+"C=8;\n",
+"Ks=(1+(0.5/C));\n",
+"\n",
+"// Let us choose oil tempered wire 0.6-0.7 %C. Refer to Table 8-4 for constants A and m, relating strength wire \n",
+"//diameter.\n",
+"G=77.2*(10^3);\n",
+"A=1855;\n",
+"m=0.187;\n",
+"// equating Tmax=0.5*sig(ut).\n",
+"// Ks*(8*W*D/(pi*(d^3)))=0.5*A/(d^2)\n",
+"d1=(Ks*(8*W*C/(%pi*A*0.5)));\n",
+"d=d1^(1/1.813);\n",
+"D=C*d;\n",
+"Na=G*(d^4)/(8*(D^3)*k);\n",
+"//Solid length = SL\n",
+"SL=(Na-1)*d\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf(' wire diameter is %0.3f mm ',d);\n",
+"printf('\n mean diameter is %0.3f mm ',D);\n",
+"printf('\n Number of acting coils are %0.3f ',Na);\n",
+"\n",
+"//The difference in the values of d,D and Na is due to rounding-off the digits."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.3: S8_3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-3\n",
+"clc;\n",
+"clear;\n",
+"d=1.626;\n",
+"A=2211;\n",
+"m=0.145;\n",
+"rm=3;\n",
+"ri=(rm-(d/2));\n",
+"sigma=A/(d^m);\n",
+"W=(sigma*%pi*(d^3)*ri)/(32*(rm^2));\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"printf('Ultimate tensile Strength is %0.1f MPa ',sigma);\n",
+"printf('\n Force at which the spring hook fails is %0.1f N ',W);\n",
+"\n",
+"//The difference in the values of sigma and W is due to rounding-off the digits."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.4: S8_4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-4\n",
+"clc;\n",
+"clear;\n",
+"Do=25;\n",
+"// mean coil diameter D=25-d\n",
+"W=150;\n",
+"T=800;\n",
+"G=81000;\n",
+"// Substituting values in equation T=8*W*D/(%pi*(d^3))\n",
+"// therefore, the equation becomes d^3 + 0.477*d = 11.936\n",
+"//consider d=2.2mm, (d can be taken between 2.2-2.3mm)\n",
+"d=2.337; //(nearest available wire gauge)\n",
+"C=9.5;\n",
+"D=22.2; \n",
+"Do=D+d;\n",
+"Ks=1+(0.5/C);\n",
+"Tmax=Ks*8*W*D/(%pi*(d^3));\n",
+"// check for safety- Tmax<T;\n",
+"Lo=100;\n",
+"Ls=40;\n",
+"//Lo=Ls+delta+0.15*delta\n",
+"delta=(Lo-Ls)/1.15;\n",
+"delta=50;\n",
+"k=150/50;\n",
+"Na=(G*d^4)/(8*(D^3)*k);\n",
+"\n",
+"N=Na+2;\n",
+"Ls=N*d;\n",
+"Lo=Ls+(1.15*delta);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.3fmm ',d);\n",
+"  printf('\n D is %0.2f mm',D);\n",
+"  printf('\n Ls is %0.2f mm',Ls);\n",
+"  printf('\n Lo is %0.2f mm',Lo);\n",
+"  if (Do<=25)\n",
+"    disp ('The diameter is within space constraints'); \n",
+"end"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.5: S8_5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-5A\n",
+"clc;\n",
+"clear;\n",
+"Di=15;\n",
+"Do=20;\n",
+"d=2.3;\n",
+"D=17.5;\n",
+"C=D/d;\n",
+"Ks=1+(0.5/C);\n",
+"Wmax=100;\n",
+"Tmax=Ks*8*Wmax*D/(%pi*(d^3));\n",
+"G=81000;\n",
+"delmax=67.7/2.366;\n",
+"k=100/28;\n",
+"Na=G*(d^4)/(8*k*(D^3));\n",
+"Ls=Na+1; //(for plain ends)\n",
+"delmax=28;\n",
+"//TL= total working length\n",
+"TL=Ls+delmax+(0.15*delmax);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('d is %0.1fmm ',d);\n",
+"  printf('\n C is %0.1f ',C);\n",
+"   printf('\n Na is %0.1f ',Na);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.6: S8_6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-6\n",
+"clc;\n",
+"clear;\n",
+"// 18 SWG=1.219MM in dia\n",
+"d=1.219;\n",
+"E=198.6*10^3;\n",
+"G=80.7*10^3;\n",
+"m=0.19;\n",
+"A=1783;\n",
+"sig=A/(d^m);\n",
+"Tys=(0.4*sig);\n",
+"Do=12.5;\n",
+"D=Do-d;\n",
+"C=D/d;\n",
+"Ks=((2*C)+1)/(2*C);\n",
+"W=(Tys*%pi*(d^3))/(8*D*Ks);\n",
+"Nt=13.5;\n",
+"Na=Nt-2;\n",
+"del=(8*W*(D^3)*Na)/(G*(d^4));\n",
+"Ls=(Nt-1)*d;\n",
+"Lo=Ls+del+(0.15*del);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tys is %0.1f MPa ',Tys);\n",
+"  printf('\n W is %0.1f N ',W);\n",
+"  printf('\n del is %0.3f mm ',del);\n",
+"  printf('\n Ls is %0.4f mm ',Ls);\n",
+"  printf('\n Lo is %0.2f mm ',Lo);\n",
+"  \n",
+"  //Answers in the book for Torsional yeild strength have been rounded-off to the nearest whole number."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.7: S8_7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-7\n",
+"clc;\n",
+"clear;\n",
+"d=1.016;\n",
+"A=2211;\n",
+"m=0.145;\n",
+"G=81000;\n",
+"Nt=16;\n",
+"Na=16-2;\n",
+"sig=A/(d^m);\n",
+"Tys=0.45*sig;\n",
+"Do=12.6;\n",
+"D=Do-d;\n",
+"C=D/d;\n",
+"Ks=1+(0.5/C);\n",
+"W=(Tys*%pi*(d^3))/(8*D*Ks);\n",
+"k=(G*(d^4))/(8*(D^3)*Na);\n",
+"del=W/k;\n",
+"Ls=(Nt-1)*d;\n",
+"Lo=Ls+(1.15*del);\n",
+"\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Tys is %0.1f MPa ',Tys);\n",
+"  printf('\n Do is %0.1f N ',Do);\n",
+"  printf('\n W is %0.1f N ',W);\n",
+"  printf('\n k is %0.3f N ',k);\n",
+"  printf('\n del is %0.2f mm ',del);\n",
+"  printf('\n Ls is %0.2f mm ',Ls);\n",
+"  printf('\n Lo is %0.3f mm ',Lo);\n",
+"  \n",
+"  if ((Lo/D)>=5.26)\n",
+"    disp ('The spring will fail under buckling'); \n",
+"end\n",
+"\n",
+"//Values after the decimal point has not been considered for answer of Torsional yeild strength in the book, whereas answers for deflection and free-length is different as entire value of variables is taken for calculation in the code."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.8: S8_8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-8\n",
+"clc;\n",
+"clear;\n",
+"d=2;\n",
+"Do=20;\n",
+"D=Do-d;\n",
+"C=D/d;\n",
+"Na=9;\n",
+"//Material hard drawn spring steel\n",
+"A=1783;\n",
+"m=0.19;\n",
+"G=81000;\n",
+"sig=A/(d^m);\n",
+"Tys=0.45*sig\n",
+"Kf=1.5;\n",
+"Ta=Tys/Kf;\n",
+"Ks=1+(0.5/C);\n",
+"W=(Ta*%pi*(d^3))/(8*D*Ks);\n",
+"k=(G*(d^4))/(8*(D^3)*Na);\n",
+"del=W/k;\n",
+"Lo=((Na+1)*d)+(1.15*del);\n",
+"p=(Lo-d)/Na;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('k is %0.3f N/mm ',k);\n",
+"  printf('\n W is %0.1f N ',W);\n",
+"  printf('\n Lo is %0.3f mm ',Lo);\n",
+"  printf('\n p is %0.3f mm ',p);\n",
+"  \n",
+"  \n",
+"  if ((Lo)>=47.34)\n",
+"    disp ('The spring will fail under buckling'); \n",
+"end\n",
+"\n",
+"//The answer for value of spring rate 'k' is misprinted in the book. Due to this all subsequent values of del,Lo,p is calucated incorrectly in the book."
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 8.9: S8_9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 8-9\n",
+"clc;\n",
+"clear;\n",
+"// for music wire\n",
+"d1=11.5;\n",
+"A=2211;\n",
+"d=1.5;\n",
+"m=0.145;\n",
+"sigut=A/(d^m);\n",
+"sigy=0.78*sigut;\n",
+"Do=16;\n",
+"E=2*(10^5);\n",
+"Nb=4.25;\n",
+"D=Do-d;\n",
+"C=D/d;\n",
+"Ki=((4*(C^2))-C-1)/(4*C*(C-1));\n",
+"Mmax=(sigy*%pi*(d^3))/(32*Ki);\n",
+"kc=((d^4)*E)/(10.8*D*Nb);\n",
+"theta3=Mmax/kc';\n",
+"l1=20;\n",
+"l2=20;\n",
+"Ne=(l1+l2)/(3*%pi*D);\n",
+"Na=Nb+Ne;\n",
+"k=((d^4)*E)/(10.8*Na*D);\n",
+"thetat=Mmax/k';\n",
+"ke=(3*%pi*(d^4)*E)/(10.8*(l1+l2));\n",
+"// angdisp=theta1+theta2=Mmax/ke;\n",
+"angdisp=Mmax/ke;\n",
+"//D1 is final coil diameter\n",
+"D1=(Nb*D)/(Nb+theta3);\n",
+"//IRC=Initial radial clearance\n",
+"IRC=((D-d)-d1)/2;\n",
+"//FRC=Final radial clearance\n",
+"FRC=((D1-d)-d1)/2;\n",
+"\n",
+"\n",
+" // printing data in scilab o/p window\n",
+" printf('Maximum Torque is %0.2f Nmm ',Mmax);\n",
+" printf('\n theta3 is %0.3f turns ',theta3);\n",
+" printf('\n Ne is %0.3f turns ',Ne);\n",
+" printf('\n ke is %0.1f N/mm ',ke);\n",
+" printf('\n theta1+theta2 is %0.4f turns ',angdisp);\n",
+" printf('\n D1 is %0.2f mm ',D1);\n",
+" printf('\n IRC is %0.2f mm ',IRC);\n",
+" printf('\n FRC is %0.2f mm ',FRC);\n",
+" "
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}
diff --git a/Machine_Design_by_U_C_Jindal/9-THREADED_FASTENERS.ipynb b/Machine_Design_by_U_C_Jindal/9-THREADED_FASTENERS.ipynb
new file mode 100644
index 0000000..fdaeb13
--- /dev/null
+++ b/Machine_Design_by_U_C_Jindal/9-THREADED_FASTENERS.ipynb
@@ -0,0 +1,447 @@
+{
+"cells": [
+ {
+		   "cell_type": "markdown",
+	   "metadata": {},
+	   "source": [
+       "# Chapter 9: THREADED FASTENERS"
+	   ]
+	},
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.10: TF10.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-10\n",
+"clc;\n",
+"clear;\n",
+"Pi=10*10^3;\n",
+"sigyp=420;\n",
+"FOS=2;\n",
+"sige=sigyp/FOS;\n",
+"K1=0.85;\n",
+"K2=0.74;\n",
+"K4=0.868;\n",
+"SCF=2.4;\n",
+"K3=1/SCF;\n",
+"sige=sige*K1*K2*K3*K4;\n",
+"Pe=10*10^3/3;\n",
+"Pmax=Pi+Pe;\n",
+"Pmin=Pi;\n",
+"Pa=(Pmax-Pmin)/2;\n",
+"Pm=(Pmax+Pmin)/2;\n",
+"theta=atan(Pa/Pm);\n",
+"siga=21.132;\n",
+"At=Pa/siga;\n",
+"At=84.2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('At is %0.1f mm^2      ',At);\n",
+"  disp('M12 coarse-pitch bolt with 1.75 mm pitch is used');"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.11: TF11.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-11\n",
+"clc;\n",
+"clear;\n",
+"Pi=15;\n",
+"Pmax=15+3.75;\n",
+"Pmin=15+1.25;\n",
+"Pa=(Pmax-Pmin)/2;\n",
+"Pm=(Pmax+Pmin)/2;\n",
+"K1=0.85;\n",
+"K2=0.7;\n",
+"K4=0.897;\n",
+"SCF=2.4;\n",
+"K3=1/SCF;\n",
+"sige=900/4*K1*K2*K3*K4;\n",
+"siga=28.115;\n",
+"At=Pa*10^3/siga;\n",
+"At=58;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('At is %0.0f mm^2      ',At);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.1: TF1.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-1\n",
+"clc;\n",
+"clear;\n",
+"p1=2;\n",
+"d=16;\n",
+"dt1=d-(0.93825*p1);\n",
+"At1=%pi*dt1^2/4;\n",
+"p2=1.5;\n",
+"d=16;\n",
+"dt2=d-(0.93825*p2);\n",
+"At2=%pi*dt2^2/4;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('At1 is %0.1f mm^2     ',At1);\n",
+"  printf('\n At2 is %0.1f mm^2     ',At2);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.2: TF2.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-2\n",
+"clc;\n",
+"clear;\n",
+"W=20*10^3;\n",
+"n=4;\n",
+"//Let the load on each bolt be W1\n",
+"W1=W/n;\n",
+"At=W1/80;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('At is %0.1f mm^2     ',At);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.3: TF3.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-3\n",
+"clc;\n",
+"clear;\n",
+"d=18;\n",
+"p=2.5;\n",
+"dr=d-(1.2268*p);\n",
+"dm=(d+dr)/2;\n",
+"alpha=atan(p/(%pi*dm));\n",
+"theta=%pi*30/180;\n",
+"u1=0.15;\n",
+"u2=0.13;\n",
+"x=(tan(alpha)+(u1/cos(theta)))/(1-(tan(alpha)*u1/cos(theta)));\n",
+"K=dm*x/(2*d)+(0.625*u2);\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('K is %0.5f      ',K);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.4: TF4.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-4\n",
+"clc;\n",
+"clear;\n",
+"d=20;\n",
+"t=4;\n",
+"Lg=84;\n",
+"Ad=%pi*d^2/4;\n",
+"Eb=205*10^3;\n",
+"Ed=105*10^3;\n",
+"kb=Ad*Eb/Lg;\n",
+"lg=80;\n",
+"x=5*(lg+(0.5*d))/(lg+(2.5*d));\n",
+"kp=%pi*Ed*d/(2*log(x));\n",
+"At=245;\n",
+"sigb=105;\n",
+"Pe=20*10^3;\n",
+"Pb=Pe*kb/(kb+kp);\n",
+"sigad=Pb/At;\n",
+"finalst=sigb+sigad;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('final stress is %0.2f N/mm^2      ',finalst);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.5: TF5.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-5\n",
+"clc;\n",
+"clear;\n",
+"Eb=207*10^3;\n",
+"Ec=105*10^3;\n",
+"sigp=650;\n",
+"At=115;\n",
+"Pi=0.75*sigp*At;\n",
+"F=sigp*At;\n",
+"//Let the additional load Fadd\n",
+"Padd=F-Pi;\n",
+"d=14;\n",
+"Ad=%pi*d^2/4;\n",
+"Lg=63;\n",
+"kb=Ad*Eb/Lg;\n",
+"lg=60;\n",
+"x=5*(lg+(0.5*d))/(lg+(2.5*d));\n",
+"km=%pi*Ec*d/(2*log(x));\n",
+"C=kb/(kb+km);\n",
+"Pe=Padd/C;\n",
+"K=0.2;\n",
+"Ti=Pi*K*d*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('Ti is %0.2f Nm      ',Ti);"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.6: TF6.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-6\n",
+"clc;\n",
+"clear;\n",
+"d=20;\n",
+"sigp=600;\n",
+"At=245;\n",
+"Pi=120*10^3;\n",
+"Pe=30*10^3;\n",
+"C=0.35;\n",
+"Pb=C*Pe;\n",
+"P=Pi+Pb;\n",
+"sigi=Pi/At;\n",
+"sigf=P/At;\n",
+"K=0.18;\n",
+"T=K*d*Pi*10^-3;\n",
+"E1=sigi/sigp;\n",
+"E2=sigf/sigp;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('sigi is %0.1f MPa     ',sigi);\n",
+"  printf('\n sigi is %0.2f MPa     ',sigf);\n",
+"  printf('\n T is %0.0f Nm     ',T);\n",
+"  printf('\n E1 is %0.3f      ',E1);\n",
+"  printf('\n E2 is %0.3f      ',E2);\n",
+"  \n",
+"  //Value upto tenthth place is considered in the book for value of final stress in bolt, 'sigf'"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.7: TF7.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-7\n",
+"// The sum sequence is numbered incorrectly in the book, from this sum ownwards.\n",
+"clc;\n",
+"clear;\n",
+"p=2;\n",
+"d=16;\n",
+"dt=d-(0.938*p);\n",
+"At=%pi*dt^2/4;\n",
+"r=60*sqrt(2);\n",
+"Td=1/(4*At);\n",
+"Ta=120;\n",
+"T=8.722*10^-3;\n",
+"P=Ta/T*10^-3;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.3f kN      ',P);\n",
+"  \n",
+"  //Value upto hundredth place is considered in the book for value of permissible load, 'P'"
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.8: TF8.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-8\n",
+"clc;\n",
+"clear;\n",
+"sigyp=460;\n",
+"FOS=2;\n",
+"Ts=0.577*sigyp/FOS;\n",
+"At=245;\n",
+"r=100;\n",
+"P=Ts*At/1.453*10^-3;\n",
+"// Open prob9p8.txt file\n",
+"fid = mopen('prob9p8.txt', 'w');\n",
+"// error message\n",
+"  if (fid == -1)\n",
+"    error('cannot open file for writing');\n",
+"  end\n",
+"  \n",
+" mfprintf(fid, 'Problem 9.8 Solution: \nThe eccentric load is %f N       ',P);\n",
+" \n",
+"  mclose(fid);\n",
+"  // printing data in scilab o/p window\n",
+"  printf('P is %0.3f kN      ',P);\n",
+"  \n",
+"  //Value of thousandth place of eccentric load, 'P' is misprinted in the book. "
+   ]
+   }
+,
+{
+		   "cell_type": "markdown",
+		   "metadata": {},
+		   "source": [
+			"## Example 9.9: TF9.sce"
+		   ]
+		  },
+  {
+"cell_type": "code",
+	   "execution_count": null,
+	   "metadata": {
+	    "collapsed": true
+	   },
+	   "outputs": [],
+"source": [
+"// sum 9-9\n",
+"clc;\n",
+"clear;\n",
+"P=4*10^3;\n",
+"e=200;\n",
+"l1=150;\n",
+"l2=550;\n",
+"sigyp=420;\n",
+"FOS=3;\n",
+"siga=sigyp/3;\n",
+"M=P*e;\n",
+"At=12.5;\n",
+"At=14.2;\n",
+"\n",
+"  // printing data in scilab o/p window\n",
+"  printf('At is %0.1f mm^2      ',At);"
+   ]
+   }
+],
+"metadata": {
+		  "kernelspec": {
+		   "display_name": "Scilab",
+		   "language": "scilab",
+		   "name": "scilab"
+		  },
+		  "language_info": {
+		   "file_extension": ".sce",
+		   "help_links": [
+			{
+			 "text": "MetaKernel Magics",
+			 "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+			}
+		   ],
+		   "mimetype": "text/x-octave",
+		   "name": "scilab",
+		   "version": "0.7.1"
+		  }
+		 },
+		 "nbformat": 4,
+		 "nbformat_minor": 0
+}