Materials Algorithms Project
Program Library

Subroutine MAP_UTIL_TRANS

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 multiply a 3x3 matrix by a 3-d column vector.

Top | Next | Prev

Specification

Top | Next | Prev

Description

MAP_UTIL_TRANS multiplies the 3x3 matrix LR by the column vector [X1,X2,X3]^T.

Top | Next | Prev

References

None provided.

Top | Next | Prev

Parameters

Input parameters

LR - real array of dimension 9.

LR is the 3x3 transformation matrix in vector form.

X1, X2, X3 - reals

X1, X2, X3 are the components of the column vector.

Output parameters

X4, X5, X6 - reals

X4, X5, X6 are the components of transformed vector.

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information supplied.

Top | Next | Prev

Further Comments

Used by the crystal analysis program MAP_CRYSTAL_PROG1.

Top | Next | Prev

Example

1. Program text

       REAL LR(9), X1, X2, X3, X4, X5, X6
       INTEGER I
       READ (5,*) (LR(I), I=1,9)
       READ (5,*) X1, X2, X3
       CALL MAP_UTIL_TRANS(LR, X1, X2, X3, X4, X5, X6)
       WRITE (6,*) X4, X5, X6
       STOP
       END

2. Program data

1.0  -1.0   2.5  -2.0   3.3   1.2  -1.0   4.0   0.5

1.0   3.0   2.0

3. Program results

3.0   10.3   12.0

Top | Next | Prev

Auxiliary Routines

None.

Top | Next | Prev

Keywords

transformation

Top | Next | Prev

Download

Download source code

Top | Prev