refs #4

gha3mi · Jul 22, 2023 · 0f248fb · 0f248fb
1 parent f464851
commit 0f248fb
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/foreig.f90 b/src/foreig.f90
@@ -85,6 +85,7 @@ pure subroutine dsyev(fjobz, fuplo, fn, fA, flda, fw, fwork, flwork, finfo)
    end subroutine dsyev_rel
    !===============================================================================
 
+
    !===============================================================================
    !> author: Seyed Ali Ghasemi
    pure subroutine dgeev_rel(matrix, eig_vecr, eig_val, eig_vecl)
@@ -127,6 +128,7 @@ pure subroutine dgeev(fjobvl, fjobvr, fn, fA, flda, fwr, fwi, fvl, fldvl, fvr, f
    end subroutine dgeev_rel
    !===============================================================================
 
+
    !===============================================================================
    !> author: Seyed Ali Ghasemi
    pure subroutine dggev_rel(matrix, eig_vecr, eig_val, eig_vecl)
@@ -178,6 +180,6 @@ pure subroutine dggev(fjobvl, fjobvr, fn, fa, flda, fb, ldb, &
       deallocate(work)
 
    end subroutine dggev_rel
-!===============================================================================
+   !===============================================================================
 
 end module foreig