[MAP Logo]

Materials Algorithms Project
Program Library


Subroutine MAP_STEEL_VEL5

  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 lengthening rate of a needle, represented as a paraboloid of revolution.

Top | Next | Prev

Specification

Language:FORTRAN
Product form:Source code

SUBROUTINE MAP_STEEL_VEL5(VMAX,ANS,RAD,XMAX,XBAR,XALPHA,
& PECLET,OMEGA)

DOUBLE PRECISION VMAX,ANS,RAD,XMAX,XBAR,XALPHA,PECLET,OMEGA

Top | Next | Prev

Description

MAP_STEEL_VEL5 calculates the lengthening rate of a needle, represented as a paraboloid of revolution. The rate calculated is for diffusion-controlled growth, with the tip radius consistent with the achievement of a maximum rate of growth.

Top | Next | Prev

References

  1. R. Trivedi, Metallurgical Transactions, 1, (1970), 921-927.

Top | Next | Prev

Parameters

Input parameters

ANS - real
ANS is ????.

XMAX - real
XMAX is the equilibrium mole fraction of carbon in austenite.

XBAR - real
XBAR is the mole fraction of carbon in the alloy.

XALPHA - real
XALPHA is the equilibrium mole fraction of carbon in ferrite.

RAD - real
RAD is the ratio of the actual needle tip radius to the critical radius.

Output parameters

PECLET - real
PECLET is ????.

OMEGA - real
OMEGA is the fraction (XMAX - XBAR)/(XMAX - XALPHA).

VMAX - real
VMAX is the maximum rate of growth (in metres per second, ms-1).

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information supplied.

Top | Next | Prev

Further Comments

Used in the program MAP_STEEL_TRIVEDI.

An alternative subroutine for this analysis is MAP_STEEL_VEL4.

Top | Next | Prev

Example

1. Program text

       DOUBLE PRECISION VMAX,ANS,RAD,XMAX,XBAR,XALPHA
       DOUBLE PRECISION PECLET,OMEGA
       READ (5,*) ANS,RAD
       READ (5,*) XMAX, XBAR, XALPHA
       CALL MAP_STEEL_VEL5(VMAX,ANS,RAD,XMAX,XBR,XALPHA,
&      PECLET,OMEGA)
       WRITE (6,10) PECLET, OMEGA, VMAX
10     FORMAT (3F10.4)
       STOP
       END

2. Program data

None supplied.

3. Program results

None supplied.

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

lengthening rate, diffusion controlled, growth, needle, diffusion

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!