blob: 1b2ec14a0462cb5638accd85aa3ec2bd93f89452 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
clc;funcprot(0);//EXAMPLE 12.5
//page 357
// Initialisation of Variables
%Fe=6.67;......//Carbon percentage in Cementite
%G=0.77;.......//Carbon percentage in peralite in composition
%A=0.0218;......//Carbon percentage in Ferrite
//CALCULATIONS
%ferrite=((%Fe-%G)/(%Fe-%A))*100;........//Amount of ferrite present in peralite
%C=((%G-%A)/(%Fe-%A))*100;.......//Amount of Cementite present in peralite
disp(%ferrite,"Amount of ferrite present in peralite:")
disp(%C,"Amount of Cementite present in peralite:")
|
