From 9c77e30c13dbec9523a826ab434fe7ab75e2a090 Mon Sep 17 00:00:00 2001
From: Pavel Kus <pavel.kus@gmail.com>
Date: Sat, 27 Jul 2019 12:45:10 +0200
Subject: [PATCH] correcting != to /= in fortran doxygen
---
src/elpa.F90 | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/elpa.F90 b/src/elpa.F90
index 3a763610..68517418 100644
--- a/src/elpa.F90
+++ b/src/elpa.F90
@@ -116,13 +116,13 @@
!> stop
!> endif
!> elpa => elpa_allocate(success)
-!> if (success != ELPA_OK) then
+!> if (success /= ELPA_OK) then
!> print *,"Could not allocate ELPA"
!> endif
!>
!> ! set parameters decribing the matrix and it's MPI distribution
!> call elpa%set("na", na, success, success)
-!> if (success != ELPA_OK) then
+!> if (success /= ELPA_OK) then
!> print *,"Could not set entry"
!> endif
!> call elpa%set("nev", nev, success, success)
@@ -139,7 +139,7 @@
!>
!> ! set up the elpa object
!> success = elpa%setup()
-!> if (succes != ELPA_OK) then
+!> if (succes /= ELPA_OK) then
!> print *,"Could not setup ELPA object"
!> endif
!>
--
GitLab