anchor.diff:      !! Base Case
       IF (mat_dim .LE. BASESIZE) THEN
          CALL StartTimer("Base Case")
  -       ! CALL BaseCase(this, fixed_param, eigenvectors)
  -       CALL JacobiSolve(this, eigenvectors, it_param)
  +       CALL SerialBase(this, fixed_param, eigenvectors)
  +       ! CALL JacobiSolve(this, eigenvectors, it_param)
          CALL StopTimer("Base Case")
       ELSE
          !! Setup
  
positive.code:     CALL DestructDistributedSparseMatrix(VAV)
    END SUBROUTINE ReduceDimension
  !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  END MODULE EigenSolversModule
  
negative.code: !> A module for computing the eigenvalues or singular values of a matrix.
  MODULE EigenSolversModule
    USE DataTypesModule, ONLY : NTREAL
    USE DenseMatrixModule, ONLY : DenseEigenDecomposition
    USE DistributedSparseMatrixAlgebraModule, ONLY : DistributedGemm, &
         & IncrementDistributedSparseMatrix
    USE DistributedSparseMatrixModule, ONLY : DistributedSparseMatrix_t, &
  