rename wksp size constants

Author: jalvesz

src/stdlib_linalg_iterative_solvers.fypp

@@ -13,10 +13,10 @@ module stdlib_linalg_iterative_solvers
 
     !! workspace sizes: defined by the number of vectors used by the iterative solver.
     enum, bind(c)
-        enumerator :: size_wksp_cg = 3
-        enumerator :: size_wksp_pcg = 4
+        enumerator :: stdlib_size_wksp_cg = 3
+        enumerator :: stdlib_size_wksp_pcg = 4
     end enum
-    public :: size_wksp_cg, size_wksp_pcg
+    public :: stdlib_size_wksp_cg, stdlib_size_wksp_pcg
 
     !! version: experimental
     !!

src/stdlib_linalg_iterative_solvers_cg.fypp

@@ -107,7 +107,7 @@ contains
         else
             allocate( workspace_ )
         end if
-        if(.not.allocated(workspace_%tmp)) allocate( workspace_%tmp(n,size_wksp_cg), source = zero_${s}$ )
+        if(.not.allocated(workspace_%tmp)) allocate( workspace_%tmp(n,stdlib_size_wksp_cg), source = zero_${s}$ )
         !-------------------------
         ! main call to the solver
         if(restart_) x = zero_${s}$

src/stdlib_linalg_iterative_solvers_pcg.fypp

@@ -156,7 +156,7 @@ contains
         else
             allocate( workspace_ )
         end if
-        if(.not.allocated(workspace_%tmp)) allocate( workspace_%tmp(n,size_wksp_pcg) , source = zero_${s}$ )
+        if(.not.allocated(workspace_%tmp)) allocate( workspace_%tmp(n,stdlib_size_wksp_pcg) , source = zero_${s}$ )
         !-------------------------
         ! main call to the solver
         if(restart_) x = zero_${s}$