Commit 1a25b02d authored by Matthias Redies's avatar Matthias Redies

wild guess intel repair

parent 3c4287f9
...@@ -192,7 +192,7 @@ contains ...@@ -192,7 +192,7 @@ contains
#endif #endif
use m_judft use m_judft
implicit none implicit none
integer, intent(in) :: comm, error_code integer :: comm, error_code
integer :: str_len, ierr integer :: str_len, ierr
character(len=3000) :: error_str character(len=3000) :: error_str
......
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