Skip to content

Commit 376f2e1

Browse files
committed
fix copy_a deallocation
1 parent 206f84a commit 376f2e1

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/stdlib_linalg_determinant.fypp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -224,7 +224,7 @@ submodule (stdlib_linalg) stdlib_linalg_determinant
224224
err0 = linalg_state_type(this,LINALG_INTERNAL_ERROR,'catastrophic error')
225225
end select
226226

227-
if (.not.copy_a) deallocate(amat)
227+
if (copy_a) deallocate(amat)
228228

229229
end select
230230

0 commit comments

Comments
 (0)