[MAP Logo]

Materials Algorithms Project
Program Library



Function MAP_STEEL_G91

  1. Provenance of code.
  2. Purpose of code.
  3. Specification.
  4. Description of subroutine's operation.
  5. References.
  6. Parameter descriptions.
  7. Error indicators.
  8. Accuracy estimate.
  9. Any additional information.
  10. Example of code
  11. Auxiliary subroutines required.
  12. Keywords.
  13. Download source code.
  14. Links.

Provenance of Source Code

H.K.D.H. Bhadeshia,
Phase Transformations Group,
Department of Materials Science and Metallurgy,
University of Cambridge,
Cambridge, U.K.

Top | Next

Purpose

To calculate the differential (w.r.t. the carbon concentration at the T0 boundary) of the free energy change accompanying the transformation from austenite to ferrite of the same chemical composition.

Top | Next | Prev

Specification

Language:FORTRAN
Product form:Source code

FUNCTION MAP_STEEL_G91(XTO,T,W,W1,H1,S1,F,H,S,AJ,AJ1,R)

DOUBLE PRECISION XTO,T,W,W1,H1,S1,F,H,S,AJ,AJ1,R

Top | Next | Prev

Description

MAP_STEEL_G91 calculates the differential (with respect to the carbon concentration at the T0 boundary) of the free energy change accompanying the transformation from austenite to ferrite of the same chemical composition.

Top | Next | Prev

References

  1. C. Zener, Trans. AIME, 167, (1946), 550.
  2. J.C. Fisher, Metals Transactions, 185, (1949), 688-690.
  3. H.K.D.H. Bhadeshia and D.V. Edmonds, Acta Metallurgica, 28, (1980), 1265-1273.

Top | Next | Prev

Parameters

Input parameters

XTO - real
XTO is the carbon concentration at the T0 boundary.

T - real
T is the temperature (in kelvin).

W - real
W is the carbon-carbon interaction energy in austenite (in joules per mole, Jmol-1).

W1 - real
W1 is the carbon-carbon interaction energy in ferrite (in joules per mole, Jmol-1).

H1 - real
H1 is the excess partial molar enthalpy of solution of carbon in ferrite (in joules per mole, Jmol-1).

S1 - real
S1 is the excess partial molar entropy of solution of carbon in ferrite (in joules per mole per kelvin, J mol-1K-1).

F - real
F is the energy.

H - real
H is the excess partial molar enthalpy of solution of carbon in austenite (in joules per mole, Jmol-1).

S - real
S is the excess partial molar entropy of solution of carbon in austenite (in joules per mole, Jmol-1).

AJ - real
AJ = 1 - e(W/RT), where R is the universal gas constant.

AJ1 - real
AJ1 = 1 - e(W1/RT), where R is the universal gas constant.

R - real
R is the universal gas constant (in joules per mole per kelvin, Jmol-1K-1)

Output parameters

MAP_STEEL_G91 - real
MAP_STEEL_G91 is the differential of MAP_STEEL_FTO1.

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information supplied.

Top | Next | Prev

Further Comments

None.

Top | Next | Prev

Example

1. Program text

       DOUBLE PRECISION XTO,T,W,W1,H1,S1,F,H,S,AJ,AJ1,R,XG91
       DOUBLE PRECISION MAP_STEEL_G91
       INCLUDE 'map_constants_gas.f'
       READ (5,*) H,S,H1,S1,W,W1
       READ(5,*) XTO,T,F,AJ,AJ1
       XG91=MAP_STEEL_G91(XTO,T,W,W1,H1,S1,F,H,S,AJ,AJ1,R)
       WRITE (6,*) XG91
       STOP
       END

2. Program data

None supplied.

3. Program results

None supplied.

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

carbon, T0 boundary, austenite, ferrite

Top | Next | Prev

Download

Download source code

Top | Prev


MAP originated from a joint project of the National Physical Laboratory and the University of Cambridge.

MAP Website administration / map@msm.cam.ac.uk

Top | Index | MAP Homepage Valid HTML 3.2!