[MAP Logo]

Materials Algorithms Project
Program Library


Subroutine MAP_STEEL_NEEDLE

  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

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

Top | Next

Purpose

To calculate the lengthening rate of a needle precipitate using the Zener approximations.

Top | Next | Prev

Specification

Language:FORTRAN
Product form:Source code

SUBROUTINE MAP_STEEL_NEEDLE(G, RC, D, XA, XC, XB)

DOUBLE PRECISION G, RC, D, XA, XC, XB

Top | Next | Prev

Description

Calculates the lengthening rate of a needle shaped precipitate growing under diffusion control. Uses the Zener equation for needle growth.

Top | Next | Prev

References

  1. C. Zener, Trans. Amer. Inst. Min. (Metall.) Engrs., 167, (1946), 550.
  2. J.W. Christian, Transformations in Metals and Alloys, Pergamon Press, (1975), 494-496.

Top | Next | Prev

Parameters

Input parameters

RC - real
RC is the critical radius for needle growth (in metres, m)

D - real
D is the diffusion coefficient of the rate controlling diffusing species (in metres squared per second, m2s-1).

XA - real
XA is the concentration of the diffusing species in the matrix at the needle tip.

XC - real
XC is the concentration of the diffusing species in the precipitate.

XB - real
XB is the concentration of the diffusing species in the matrix far from the needle.

Output parameters

G - real
G is the lengthening rate of the needle (in metres per second, ms-1).

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information supplied.

Top | Next | Prev

Further Comments

This routine, when combined with MAP_STEEL_CRITRAD, enables the prediction of lengthening rate from composition and temperature alone.

Top | Next | Prev

Example

1. Program text

       DOUBLE PRECISION G, RC, D, XA, XC, XB
       READ (5,*) G, RC, D, XA, XC, XB
       CALL MAP_STEEL_NEEDLE(G, RC, D, XA, XC, XB)
       WRITE (6,10) G
 10    FORMAT ('G=', E13.5)
       STOP
       END

2. Program data

3.738E-9   5.974E-19    0.005    0.5     0.01

3. Program results

G = 4.03520E-13

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

needle, precipitate, growth, Zener model, lengthening rate

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!