blob: 7c071c0138db763b72c6e2001a899813d443c88e (
plain)
1
2
3
4
5
6
7
8
|
clc;funcprot(0);//EXAMPLE 12.10
//page 366
// Initialisation of Variables
%M=0.60;.......//Percentage of Carbon in Martensite at 750 degree celsius
%a=50;......//Percentage of Carbon in Austenite at 750 degree celsius
%c=0.02;......//Percentage of Carbon atoms in Steel
X=(%a/100)*(%M-%c)+%c;......//The carbon content of Steel in percentage
disp(X,"The carbon content of hypoeutectoid Steel in percentage:")
|