rename example programs

Author: perazz

doc/specs/stdlib_linalg.md

@@ -1020,7 +1020,7 @@ Exceptions always trigger an `error stop`.
 ### Example
 
 ```fortran
-{!example/linalg/example_inverse1.f90!}
+{!example/linalg/example_inverse_operator.f90!}
 ```
 
 ## `invert` - Inversion of a square matrix. 
@@ -1065,7 +1065,11 @@ If `err` is not present, exceptions trigger an `error stop`.
 ### Example
 
 ```fortran
-{!example/linalg/example_inverse3.f90!}
+{!example/linalg/example_inverse_inplace.f90!}
+```
+
+```fortran
+{!example/linalg/example_inverse_subroutine.f90!}
 ```
 
 ## `inv` - Inverse of a square matrix. 
@@ -1101,5 +1105,5 @@ If `err` is not present, exceptions trigger an `error stop`.
 ### Example
 
 ```fortran
-{!example/linalg/example_inverse2.f90!}
+{!example/linalg/example_inverse_function.f90!}
 ```

example/linalg/CMakeLists.txt

@@ -12,10 +12,10 @@ ADD_EXAMPLE(is_skew_symmetric)
 ADD_EXAMPLE(is_square)
 ADD_EXAMPLE(is_symmetric)
 ADD_EXAMPLE(is_triangular)
-ADD_EXAMPLE(inverse1)
-ADD_EXAMPLE(inverse2)
-ADD_EXAMPLE(inverse3)
-ADD_EXAMPLE(inverse4)
+ADD_EXAMPLE(inverse_operator)
+ADD_EXAMPLE(inverse_function)
+ADD_EXAMPLE(inverse_inplace)
+ADD_EXAMPLE(inverse_subroutine)
 ADD_EXAMPLE(outer_product)
 ADD_EXAMPLE(trace)
 ADD_EXAMPLE(state1)

example/linalg/example_inverse2.f90 renamed to example/linalg/example_inverse_function.f90

@@ -1,5 +1,5 @@
 ! Matrix inversion example: function interface
-program example_inverse2
+program example_inverse_function
   use stdlib_linalg_constants, only: dp
   use stdlib_linalg, only: inv,eye
   implicit none
@@ -19,4 +19,4 @@ program example_inverse2
   ! Final check 
   print *, 'CHECK passed? ',matmul(A,Am1)==eye(2)
 
-end program example_inverse2
+end program example_inverse_function

example/linalg/example_inverse3.f90 renamed to example/linalg/example_inverse_inplace.f90

@@ -1,5 +1,5 @@
 ! Matrix inversion example: in-place inversion
-program example_inverse3
+program example_inverse_inplace
   use stdlib_linalg_constants, only: dp
   use stdlib_linalg, only: invert,eye
   implicit none
@@ -20,4 +20,4 @@ program example_inverse3
   ! Final check 
   print *, 'CHECK passed? ',matmul(A,Am1)==eye(2)
 
-end program example_inverse3
+end program example_inverse_inplace

example/linalg/example_inverse1.f90 renamed to example/linalg/example_inverse_operator.f90

@@ -1,5 +1,5 @@
 ! Matrix inversion example: operator interface
-program example_inverse1
+program example_inverse_operator
   use stdlib_linalg_constants, only: dp
   use stdlib_linalg, only: operator(.inv.),eye
   implicit none
@@ -19,4 +19,4 @@ program example_inverse1
   ! Final check 
   print *, 'CHECK passed? ',matmul(A,Am1)==eye(2)
 
-end program example_inverse1
+end program example_inverse_operator

example/linalg/example_inverse4.f90 renamed to example/linalg/example_inverse_subroutine.f90

@@ -1,5 +1,5 @@
 ! Matrix inversion example: subroutine interface
-program example_inverse4
+program example_inverse_subroutine
   use stdlib_linalg_constants, only: dp
   use stdlib_linalg, only: invert,eye
   implicit none
@@ -19,4 +19,4 @@ program example_inverse4
   ! Final check 
   print *, 'CHECK passed? ',matmul(A,Am1)==eye(2)
 
-end program example_inverse4
+end program example_inverse_subroutine