[MAP Logo]

Materials Algorithms Project
Program Library

Subroutine MAP_STEEL_HETRO

Provenance of code.
Purpose of code.
Specification.
Description of subroutine's operation.
References.
Parameter descriptions.
Error indicators.
Accuracy estimate.
Any additional information.
Example of code
Auxiliary subroutines required.
Keywords.
Download source code.
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

MAP_STEEL_HETRO calculates compositions for solute depleted regions.

Top | Next | Prev

Specification

Language:	FORTRAN
Product form:	Source code

SUBROUTINE MAP_STEEL_HETRO(C,D,M,R)

DOUBLE PRECISION C(7), D(8), M, R

Top | Next | Prev

Description

MAP_STEEL_HETRO calculates compositions for solute depleted regions. Carbon partitioning is ignored. Thermodynamic data is taken from [1].

Top | Next | Prev

References

J.S. Kirkaldy and E.A. Baganis, Metallurgical Transactions, 9A, (1978), 495-501.

Top | Next | Prev

Parameters

Input parameters

C - real array of dimension 7: C contains the concentrations (by weight percent) of carbon, silicon, manganese, nickel, molybdenum, chromium, and vanadium.
M - real: M is the melting point (in kelvin). If it is assumed that solidification is as for delta ferrite, then a value of 1793.0 may be used.
R - real: R is the universal gas constant (in joules per mole per kelvin, Jmol^-1K^-1).

Output parameters

D - real array of dimension 8: D contains the concentrations (by weight percent) of carbon, silicon, manganese, nickel, molybdenum, chromium, vanadium, and iron, in the the solute depleted regions.

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 C(7),D(8),M,R
       INTEGER I
       INCLUDE 'map_constants_gas.f'
       READ (5,*) (C(I), I=1,7)
       READ (5,*) M
       CALL MAP_STEEL_HETRO(C,D,M,R)
       WRITE (6,*) (D(I), I=1,8)
       STOP
       END

2. Program data

A temperature of 1773 K produces the output listed under "Program results".

0.044   0.34   1.09   0.01   0.01   0.01   0.01

3. Program results

4.4000000000000D-02   0.24222276147993   0.81429849930809    4.5530070183873D-03
    4.9634466737045D-03   8.2769168861460D-03   7.6021657367488D-03   
    98.874083202897

Top | Next | Prev