summaryrefslogtreecommitdiff
path: root/539/CH3/EX3.1/Example_3_1.sce
blob: f2ee6469ecaa2f67d261fc8c9cc001c94eebe47b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Determination of FCC Unit Cell Volume

clear;
clc;

printf("\tExample 3.1\n");

//For FCC a=2*R*sqrt(2)
R=poly([0],'R');

//Edge Length
a=2*R*sqrt(2);

//Volume determination
V=a^3;

disp(V,"Volume is");

//End