Skip to content

Commit a94647c

Browse files
perazzjalvesz
andauthored
Update src/stdlib_linalg_norms.fypp
Co-authored-by: jalvesz <102541118+jalvesz@users.noreply.github.com>
1 parent 07f0525 commit a94647c

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/stdlib_linalg_norms.fypp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -209,7 +209,7 @@ submodule(stdlib_linalg) stdlib_linalg_norms
209209
#:endif
210210
case(NORM_INF)
211211
nrm = maxval( abs(a) )
212-
case(-NORM_INF)
212+
case(NORM_MINUSINF)
213213
nrm = minval( abs(a) )
214214
case (NORM_POW_FIRST:NORM_POW_LAST)
215215
rorder = 1.0_${rk}$ / norm_request

0 commit comments

Comments
 (0)