Commit 5442931a authored by Andreas Marek's avatar Andreas Marek

Merge branch 'master_pre_stage' of https://gitlab.mpcdf.mpg.de/elpa/elpa into master_pre_stage

parents 7b6184c4 9c77e30c
......@@ -116,16 +116,15 @@
!> 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)
!> ! check success code ...
!>
......@@ -140,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
!>
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment