[MAP Logo] Materials Algorithms Project
           FORTRAN Library

[Dept logo bar]

Subroutine MAP_UTIL_REED

  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.

[Dept logo bar]

Provenance of Source Code

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

Return to top of Document

Purpose

To read a real number in a way which, to some extent, traps typing errors.
After 10 invalid attempts to read the input, the program is terminated.

Return to top of Document

Specification

SUBROUTINE MAP_UTIL_REED(A)

DOUBLE PRECISION A

Return to top of Document

Description

Uses the ERR specifier in a READ statement to detect incorrect data input.

Return to top of Document

References

See, for example, T.M.R. Ellis, FORTRAN 77 Programming, Addison-Wesley 1993,
p184.

Return to top of Document

Parameters

Input parameters

A - real
     Number to be checked.

Output parameters

None
     Outputs error message to screen.

Return to top of Document

Error Indicators

Uses the FORTRAN ERR specifier to detect an incorrect input data value.

Return to top of Document

Accuracy

Not applicable.

Return to top of Document

Further Comments

Used in program MAP_STEEL_MUCG46.

See also MAP_UTIL_REEDI.

Return to top of Document

Example

1. Program text

       None supplied.

2. Program data

None supplied.

3. Program results

None supplied.

Return to top of Document

Auxiliary Routines

None.

Keywords

error trapping, real.

Download source code

[Dept logo bar]

The MAP Project originated from a joint project of the National Physical
Laboratory and the University of Cambridge.

MAP Website administration / map@msm.cam.ac.uk

Return to top of Document
Subroutines Index
MAP Homepage
