H.K.D.H. Bhadeshia,
Phase Transformations Group,
Department of Materials Science and Metallurgy,
University of Cambridge,
Cambridge, U.K.
To calculate the determinant of a 3x3 matrix.
| Language: | FORTRAN |
| Product form: | Source code |
MAP_UTIL_DET calculates the determinant of a 3x3 matrix held in vector form.
None.
No information supplied.
None.
REAL G(9), DEL
INTEGER I
READ (5,*) (G(I), I=1,9)
CALL MAP_UTIL_DET(G, DEL)
WRITE (6,*) DEL
STOP
END
1.0 -1.0 2.5 -2.0 3.3 1.2 -1.0 4.0 0.5
-14.7
None.
determinant
MAP originated from a joint project of the National Physical Laboratory and the University of Cambridge.
MAP Website administration / map@msm.cam.ac.uk