[MAP Logo]

Materials Algorithms Project
Program Library



Function MAP_STEEL_GMART

  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

Used by MAP_STEEL_MART in estimating the volume fraction of martensite.

Top | Next | Prev

Specification

Language:FORTRAN
Product form:Source code

DOUBLE PRECISION FUNCTION MAP_STEEL_GMART(VMART,MS,TQ)

DOUBLE PRECISION VMART,MS,TQ

Top | Next | Prev

Description

MAP_STEEL_GMART = - log(1 - VMART)/VMART - M(MS - TQ) - 1
where [1] gives a value of M of 0.0029.

Top | Next | Prev

References

  1. S.A. Khan and H.K.D.H. Bhadeshia, Materials Science and Engineering A, 129A, (1990), 257-272.

Top | Next | Prev

Parameters

Input parameters

VMART - real
VMART is the current estimate of the volume fraction of martensite.

MS - real
MS is the martensite-start temperature of the alloy (in Kelvin).

TQ - real
TQ is the ambient temperature for the retained austenite calculation (in Kelvin).

M - real
M is a constant. See [1] for a value of M of 0.0029.

Output parameters

MAP_STEEL_GMART - real function
See description.

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 VMART,MS,TQ,MAP_STEEL_GMART,XGM
      READ (*,*) VMART,MS,TQ
      XGM=MAP_STEEL_GMART(VMART,MS,TQ)
      WRITE (*,*) XGM
      STOP
      END

2. Program data


0.09089 36.4 20.0

3. Program results


 8.411445D-04

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

martensite

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!