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