[MAP Logo]

Materials Algorithms Project
Program Library



Function MAP_STEEL_TIMTEMP

  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

G.I. Rees,
Phase Transformations Group,
Department of Materials Science and Metallurgy,
University of Cambridge,
Cambridge, U.K.

Top | Next

Purpose

Gives the time for any given temperature as a function of the characteristic time.

Top | Next | Prev

Specification

Language:FORTRAN
Product form:Source code

DOUBLE PRECISION FUNCTION MAP_STEEL_TIMTEMP(TCC, DELT)

DOUBLE PRECISION TCC, DELT

Top | Next | Prev

Description

The thermal cycle of the weld is assumed to be past its peak. As a function of the characteristic time Delta, MAP_STEEL_TIMTEMP gives the time for any temperature, with zero time corresponding to 800°C.

Equation

where tcc is the input temperature and t00 is set within the program to be 70°C.

Top | Next | Prev

References

None supplied.

Top | Next | Prev

Parameters

Input parameters

TCC - real
TCC is the given temperature (in centigrade).

DELT - real
DELT is the characteristic time Delta (in seconds).

Output parameters

MAP_STEEL_TIMTEMP - real function
MAP_STEEL_TIMTEMP is the time for temperature TCC (in seconds).

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information supplied.

Top | Next | Prev

Further Comments

Called by MAP_STEEL_MICRO if natural weld-type cooling is being used rather than cooling that is linear with time.

Top | Next | Prev

Example

1. Program text

       DOUBLE PRECISION TCC, DELT, MAP_STEEL_TIMTEMP, TIMX
       READ (5,*) TCC, DELT
       TIMX = MAP_STEEL_TIMTEMP(TCC, DELT)
       WRITE (6,10) TIMX
10     FORMAT ('Time is ',D13.5,' seconds')
       STOP
       END

2. Program data

700.0   500.0

3. Program results

Time is 0.11376D+03 seconds

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

natural weld-type cooling

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!