Skip to content

Commit 7e296bb

Browse files
committed
add comments to the example
1 parent ca3e470 commit 7e296bb

File tree

1 file changed

+3
-2
lines changed

1 file changed

+3
-2
lines changed

example/intrinsics/example_matmul.f90

Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,10 @@
11
program example_matmul
22
use stdlib_intrinsics, only: stdlib_matmul
33
complex :: x(2, 2), y(2, 2), z(2, 2)
4-
x = reshape([(0, 0), (1, 0), (1, 0), (0, 0)], [2, 2])
4+
5+
x = reshape([(0, 0), (1, 0), (1, 0), (0, 0)], [2, 2]) ! pauli x-matrix
56
y = reshape([(0, 0), (0, 1), (0, -1), (0, 0)], [2, 2]) ! pauli y-matrix
6-
z = reshape([(1, 0), (0, 0), (0, 0), (-1, 0)], [2, 2])
7+
z = reshape([(1, 0), (0, 0), (0, 0), (-1, 0)], [2, 2]) ! pauli z-matrix
78

89
print *, stdlib_matmul(x, y) ! should be iota*z
910
print *, stdlib_matmul(y, z, x) ! should be iota*identity

0 commit comments

Comments
 (0)