Merge pull request #880 from cyrilgandon/fix_pivot_missing

Fix missing argument to linalg_invert_inplace_ call in linalg_invert_split

Author: jvdp1

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), &