Skip to content

Commit 13636a9

Browse files
perazzjalvesz
andauthored
Update example/linalg/example_get_norm.f90
Co-authored-by: jalvesz <102541118+jalvesz@users.noreply.github.com>
1 parent a94647c commit 13636a9

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

example/linalg/example_get_norm.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -44,7 +44,7 @@ program example_get_norm
4444
print *, 'minval(||a(:,i)||) = ',nrmd ! 1.00000000 0.00000000 3.00000000
4545

4646
! Catch Error:
47-
! [norm] returned Value Error: dimension 4 is out of rank for shape(a)= [3 3]
47+
! [norm] returned Value Error: dimension 4 is out of rank for shape(a)= [3, 3]
4848
call get_norm(a, nrmd, 'inf', dim=4, err=err)
4949
print *, 'invalid: ',err%print()
5050

0 commit comments

Comments
 (0)