[MAP Logo] Materials Algorithms Project
           FORTRAN Library

[Dept logo bar]

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.

[Dept logo bar]

Provenance of Source Code

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

Return to top of Document

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.

Return to top of Document

Specification

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

Return to top of Document

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.

Return to top of Document

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.

Return to top of Document

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.

Return to top of Document

Error Indicators

None.

Return to top of Document

Accuracy

No information supplied.

Return to top of Document

Further Comments

None.

Return to top of Document

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.

Return to top of Document

Auxiliary Routines

None.

Keywords

carbon, T0 boundary, austenite, ferrite

Download source code

[Dept logo bar]

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

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

Return to top of Document
Functions Index
MAP Homepage

[W3C Wilbur Checked!]
