add subm within the submodule name to avoid conflicts

fortran-lang · jalvesz · Jan 24, 2025 · Dec 30, 2024 · Dec 30, 2024 · Dec 30, 2024
commit 2f30f82ee81ef11dfded36d9f89196e01b7b9bb5
diff --git a/src/blas/stdlib_blas_subm_level1.fypp b/src/blas/stdlib_blas_subm_level1.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level1
+submodule(stdlib_blas) stdlib_blas_subm_level1
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level2_ban.fypp b/src/blas/stdlib_blas_subm_level2_ban.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level2_ban
+submodule(stdlib_blas) stdlib_blas_subm_level2_ban
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level2_gen.fypp b/src/blas/stdlib_blas_subm_level2_gen.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level2_gen
+submodule(stdlib_blas) stdlib_blas_subm_level2_gen
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level2_pac.fypp b/src/blas/stdlib_blas_subm_level2_pac.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level2_pac
+submodule(stdlib_blas) stdlib_blas_subm_level2_pac
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level2_sym.fypp b/src/blas/stdlib_blas_subm_level2_sym.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level2_sym
+submodule(stdlib_blas) stdlib_blas_subm_level2_sym
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level2_tri.fypp b/src/blas/stdlib_blas_subm_level2_tri.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level2_tri
+submodule(stdlib_blas) stdlib_blas_subm_level2_tri
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level3_gen.fypp b/src/blas/stdlib_blas_subm_level3_gen.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level3_gen
+submodule(stdlib_blas) stdlib_blas_subm_level3_gen
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level3_sym.fypp b/src/blas/stdlib_blas_subm_level3_sym.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level3_sym
+submodule(stdlib_blas) stdlib_blas_subm_level3_sym
  implicit none
 
 

diff --git a/src/blas/stdlib_blas_subm_level3_tri.fypp b/src/blas/stdlib_blas_subm_level3_tri.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_blas) stdlib_blas_level3_tri
+submodule(stdlib_blas) stdlib_blas_subm_level3_tri
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_auxiliary.fypp b/src/lapack/stdlib_lapack_subm_auxiliary.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_auxiliary
+submodule(stdlib_lapack_base) stdlib_lapack_subm_auxiliary
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_base.fypp b/src/lapack/stdlib_lapack_subm_blas_like_base.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_base
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_base
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_l1.fypp b/src/lapack/stdlib_lapack_subm_blas_like_l1.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_l1
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_l1
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_l2.fypp b/src/lapack/stdlib_lapack_subm_blas_like_l2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_l2
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_l2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_l3.fypp b/src/lapack/stdlib_lapack_subm_blas_like_l3.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_l3
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_l3
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_mnorm.fypp b/src/lapack/stdlib_lapack_subm_blas_like_mnorm.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_mnorm
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_mnorm
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_blas_like_scalar.fypp b/src/lapack/stdlib_lapack_subm_blas_like_scalar.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_blas_like_scalar
+submodule(stdlib_lapack_base) stdlib_lapack_subm_blas_like_scalar
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_cosine_sine.fypp b/src/lapack/stdlib_lapack_subm_cosine_sine.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_cosine_sine
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_cosine_sine
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_cosine_sine2.fypp b/src/lapack/stdlib_lapack_subm_cosine_sine2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_cosine_sine2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_cosine_sine2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_comp.fypp b/src/lapack/stdlib_lapack_subm_eigv_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_comp
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_comp2.fypp b/src/lapack/stdlib_lapack_subm_eigv_comp2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_comp2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_comp2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_gen.fypp b/src/lapack/stdlib_lapack_subm_eigv_gen.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_gen
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_gen
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_gen2.fypp b/src/lapack/stdlib_lapack_subm_eigv_gen2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_gen2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_gen2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_gen3.fypp b/src/lapack/stdlib_lapack_subm_eigv_gen3.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_gen3
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_gen3
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_std_driver.fypp b/src/lapack/stdlib_lapack_subm_eigv_std_driver.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_std_driver
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_std_driver
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_svd_bidiag_dc.fypp b/src/lapack/stdlib_lapack_subm_eigv_svd_bidiag_dc.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_svd_bidiag_dc
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_svd_bidiag_dc
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_svd_drivers.fypp b/src/lapack/stdlib_lapack_subm_eigv_svd_drivers.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_svd_drivers
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_svd_drivers
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_svd_drivers2.fypp b/src/lapack/stdlib_lapack_subm_eigv_svd_drivers2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_svd_drivers2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_svd_drivers2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_svd_drivers3.fypp b/src/lapack/stdlib_lapack_subm_eigv_svd_drivers3.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_svd_drivers3
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_svd_drivers3
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_sym.fypp b/src/lapack/stdlib_lapack_subm_eigv_sym.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_sym
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_sym
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_sym_comp.fypp b/src/lapack/stdlib_lapack_subm_eigv_sym_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_sym_comp
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_sym_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_tridiag.fypp b/src/lapack/stdlib_lapack_subm_eigv_tridiag.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_tridiag
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_tridiag
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_tridiag2.fypp b/src/lapack/stdlib_lapack_subm_eigv_tridiag2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_tridiag2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_tridiag2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_eigv_tridiag3.fypp b/src/lapack/stdlib_lapack_subm_eigv_tridiag3.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_eigv_tridiag3
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_eigv_tridiag3
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_givens_jacobi_rot.fypp b/src/lapack/stdlib_lapack_subm_givens_jacobi_rot.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_givens_jacobi_rot
+submodule(stdlib_lapack_base) stdlib_lapack_subm_givens_jacobi_rot
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_householder_reflectors.fypp b/src/lapack/stdlib_lapack_subm_householder_reflectors.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_base) stdlib_lapack_householder_reflectors
+submodule(stdlib_lapack_base) stdlib_lapack_subm_householder_reflectors
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_lsq.fypp b/src/lapack/stdlib_lapack_subm_lsq.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_lsq
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_lsq
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_lsq_aux.fypp b/src/lapack/stdlib_lapack_subm_lsq_aux.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_lsq_aux
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_lsq_aux
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_lsq_constrained.fypp b/src/lapack/stdlib_lapack_subm_lsq_constrained.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_lsq_constrained
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_lsq_constrained
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_orthogonal_factors_ql.fypp b/src/lapack/stdlib_lapack_subm_orthogonal_factors_ql.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_orthogonal_factors_ql
+submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_subm_orthogonal_factors_ql
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_orthogonal_factors_qr.fypp b/src/lapack/stdlib_lapack_subm_orthogonal_factors_qr.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_orthogonal_factors_qr
+submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_subm_orthogonal_factors_qr
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_orthogonal_factors_rz.fypp b/src/lapack/stdlib_lapack_subm_orthogonal_factors_rz.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_orthogonal_factors_rz
+submodule(stdlib_lapack_orthogonal_factors) stdlib_lapack_subm_orthogonal_factors_rz
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_others.fypp b/src/lapack/stdlib_lapack_subm_others.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_others) stdlib_lapack_others
+submodule(stdlib_lapack_others) stdlib_lapack_subm_others
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_aux.fypp b/src/lapack/stdlib_lapack_subm_solve_aux.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_aux
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_aux
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_chol.fypp b/src/lapack/stdlib_lapack_subm_solve_chol.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_chol
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_chol
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_chol_comp.fypp b/src/lapack/stdlib_lapack_subm_solve_chol_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_chol_comp
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_chol_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_ldl.fypp b/src/lapack/stdlib_lapack_subm_solve_ldl.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_ldl
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_ldl
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_ldl_comp.fypp b/src/lapack/stdlib_lapack_subm_solve_ldl_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_ldl_comp
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_ldl_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_ldl_comp2.fypp b/src/lapack/stdlib_lapack_subm_solve_ldl_comp2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_ldl_comp2
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_ldl_comp2
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_ldl_comp3.fypp b/src/lapack/stdlib_lapack_subm_solve_ldl_comp3.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_ldl_comp3
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_ldl_comp3
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_ldl_comp4.fypp b/src/lapack/stdlib_lapack_subm_solve_ldl_comp4.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_ldl_comp4
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_ldl_comp4
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_lu.fypp b/src/lapack/stdlib_lapack_subm_solve_lu.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_lu
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_lu
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_lu_comp.fypp b/src/lapack/stdlib_lapack_subm_solve_lu_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_lu_comp
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_lu_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_solve_tri_comp.fypp b/src/lapack/stdlib_lapack_subm_solve_tri_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_solve) stdlib_lapack_solve_tri_comp
+submodule(stdlib_lapack_solve) stdlib_lapack_subm_solve_tri_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_svd_bidiag_qr.fypp b/src/lapack/stdlib_lapack_subm_svd_bidiag_qr.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_svd_bidiag_qr
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_svd_bidiag_qr
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_svd_comp.fypp b/src/lapack/stdlib_lapack_subm_svd_comp.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_svd_comp
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_svd_comp
  implicit none
 
 

diff --git a/src/lapack/stdlib_lapack_subm_svd_comp2.fypp b/src/lapack/stdlib_lapack_subm_svd_comp2.fypp
@@ -1,5 +1,5 @@
 #:include "common.fypp" 
-submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_svd_comp2
+submodule(stdlib_lapack_eig_svd_lsq) stdlib_lapack_subm_svd_comp2
  implicit none