Materials Algorithms Project
Program Library

Subroutine MAP_UTIL_INVERS

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 inverse of a 3x3 matrix (held in a vector form).

Top | Next | Prev

Specification

Top | Next | Prev

Description

MAP_UTIL_INVERS calculates the inverse A of the 3x3 matrix B. Both A and B are in vector form.

Top | Next | Prev

References

None supplied.

Top | Next | Prev

Parameters

Input parameters

B - real array of dimension 9

B contains the elements of the matrix (in vector form) that is to be inverted.

Output parameters

A - real array of dimension 9

A contains the inverse of B (in vector form).

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

       REAL A(9),B(9)
       INTEGER I
       READ (5,*) (B(I), I=1,9)
       CALL MAP_UTIL_INVERS(A,B)
       WRITE (6,*) (A(I), I=1,9)
       STOP
       END

2. Program data

1.0   1.0   0   0   1.0   1.0   1.0   0   1.0

3. Program results

0.5   -0.5   0.5   0.5   0.5   -0.5   -0.5   0.5   0.5

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

matrix, inverse

Top | Next | Prev

Download

Download source code

Top | Prev