summaryrefslogtreecommitdiff
path: root/1586/CH3/EX3.5/EXP3_5.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1586/CH3/EX3.5/EXP3_5.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1586/CH3/EX3.5/EXP3_5.sce')
-rw-r--r--1586/CH3/EX3.5/EXP3_5.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/1586/CH3/EX3.5/EXP3_5.sce b/1586/CH3/EX3.5/EXP3_5.sce
new file mode 100644
index 000000000..710b10104
--- /dev/null
+++ b/1586/CH3/EX3.5/EXP3_5.sce
@@ -0,0 +1,15 @@
+clc;funcprot(0);//EXAMPLE 3.5
+// Initialisation of Variables
+a=5.156;........//The lattice constants for the monoclinic unit cells in Angstroms
+b=5.191;........//The lattice constants for the monoclinic unit cells in Angstroms
+c=5.304;........//The lattice constants for the monoclinic unit cells in Angstroms
+beeta=98.9;.......//The angle fro the monoclinic unit cell
+a2=5.094;........//The lattice constants for the tetragonal unit cells in Angstroms
+c2=5.304;........//The lattice constants for the tetragonal unit cells in Angstroms
+//CALCULATIONS
+v2=(a2^2)*c2;........//volume of a tetragonal unit cell
+v1=a*b*c*sin(beeta*%pi/180);........//volume of a monoclinic unit cell
+Pv=(v1-v2)/(v1)*100;........//The percent change in volume in percent
+disp(v2,"volume of a tetragonal unit cell:")
+disp(v1,"volume of a monoclinic unit cell:")
+disp(Pv,"The percent change in volume in percent:")