minor style fixes

Author: milancurcic

src/stdlib_linalg.fypp

@@ -73,11 +73,11 @@ module stdlib_linalg
     !! Computes outer product of two vectors, returning a matrix
     !! ([Specification](../page/specs/stdlib_linalg.html#description_3))
     #:for k1, t1 in RCI_KINDS_TYPES
-     module function outer_product_${t1[0]}$${k1}$(u,v) result(res)
-       ${t1}$, intent(in) :: u(:), v(:)
-       ${t1}$ :: res(size(u),size(v))
-       integer :: col
-     end function outer_product_${t1[0]}$${k1}$
+      module function outer_product_${t1[0]}$${k1}$(u, v) result(res)
+        ${t1}$, intent(in) :: u(:), v(:)
+        ${t1}$ :: res(size(u),size(v))
+        integer :: col
+      end function outer_product_${t1[0]}$${k1}$
     #:endfor
   end interface outer_product
 

src/stdlib_linalg_outer_product.fypp

@@ -6,15 +6,15 @@ submodule (stdlib_linalg) stdlib_linalg_outer_product
 
 contains
 
-    #:for k1, t1 in RCI_KINDS_TYPES
-     module function outer_product_${t1[0]}$${k1}$(u,v) result(res)
-       ${t1}$, intent(in) :: u(:), v(:)
-       ${t1}$ :: res(size(u),size(v))
-       integer :: col
-       do col = 1, size(v)
-           res(:,col) = v(col) * u
-       end do
-      end function outer_product_${t1[0]}$${k1}$
-    #:endfor
+  #:for k1, t1 in RCI_KINDS_TYPES
+    module function outer_product_${t1[0]}$${k1}$(u, v) result(res)
+      ${t1}$, intent(in) :: u(:), v(:)
+      ${t1}$ :: res(size(u),size(v))
+      integer :: col
+      do col = 1, size(v)
+        res(:,col) = v(col) * u
+      end do
+    end function outer_product_${t1[0]}$${k1}$
+  #:endfor
 
 end submodule