H.K.D.H. Bhadeshia,
Phase Transformations Group,
Department of Materials Science and Metallurgy,
University of Cambridge,
Cambridge, U.K.
To calculate the product of two 3x3 matrices.
Language: | FORTRAN |
Product form: | Source code |
MAP_UTIL_PROD calculates the matrix product A of the two 3x3 matrices B and C. A, B and C are in vector form.
None supplied.
None.
No information supplied.
Used by the crystal analysis program MAP_CRYSTAL_PROGRAM.
REAL A(9), B(9), C(9) INTEGER I READ (5,*) (B(I), I=1,9) READ (5,*) (C(I), I=1,9) CALL MAP_UTIL_PROD(A, B, C) WRITE (6,*) (A(I), I=1,9) STOP END
1.0 2.0 0.0 3.0 -1.0 1.0 4.0 -2.0 1.0 -2.0 1.0 -3.0 4.0 -1.0 0.0 3.0 1.0 2.0
6.0 -1.0 -3.0 -7.0 5.0 -7.0 -13.0 7.0 -10.0
None.
product
MAP originated from a joint project of the National Physical Laboratory and the University of Cambridge.
MAP Website administration / map@msm.cam.ac.uk