diff --git a/src/stdlib_linalg_inverse.fypp b/src/stdlib_linalg_inverse.fypp
index 38ad3dda7..20567b2fa 100644
--- a/src/stdlib_linalg_inverse.fypp
+++ b/src/stdlib_linalg_inverse.fypp
@@ -121,7 +121,7 @@ submodule (stdlib_linalg) stdlib_linalg_inverse
              inva = a
 
              !> Compute matrix inverse
-             call stdlib_linalg_invert_inplace_${ri}$(inva,err=err0)      
+             call stdlib_linalg_invert_inplace_${ri}$(inva,pivot=pivot,err=err0)      
             
          end if         
          
@@ -164,7 +164,7 @@ submodule (stdlib_linalg) stdlib_linalg_inverse
             if (allocated(inva)) deallocate(inva)
             allocate(inva(size(a,1,kind=ilp),size(a,2,kind=ilp))) 
             
-            #:if rt.startswith('complex')
+            #:if rt.startswith('real')
             inva = ieee_value(1.0_${rk}$,ieee_quiet_nan)
             #:else
             inva = cmplx(ieee_value(1.0_${rk}$,ieee_quiet_nan), &