diff options
Diffstat (limited to '1586/CH12/EX12.10/EXP12_10.sce')
| -rw-r--r-- | 1586/CH12/EX12.10/EXP12_10.sce | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/1586/CH12/EX12.10/EXP12_10.sce b/1586/CH12/EX12.10/EXP12_10.sce new file mode 100644 index 000000000..0cfa7c7a9 --- /dev/null +++ b/1586/CH12/EX12.10/EXP12_10.sce @@ -0,0 +1,7 @@ +clc;funcprot(0);//EXAMPLE 12.10
+// 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:")
|