Anonymous user
Conjugate transpose: Difference between revisions
m
→{{header|J}}: format "FORTRAN verification" section
(→{{header|J}}: remove redundant definition ('mp' duplicates 'X')) |
m (→{{header|J}}: format "FORTRAN verification" section) |
||
Line 870:
| |1 0 1| 0 0 0j1|
+--------+-----+--------------------------+
NB. In J, PjQ is P + Q*i and the 0.7071... is sqrt(2)
hermitian=: -: ct
normal =: (X~ -: X) ct
unitary=: ct -: %.
(hermitian,normal,unitary)&.>HERMITIAN;NORMAL;UNITARY
+-----+-----+-----+
+-----+-----+-----+</lang>
=={{header|Julia}}==
|