Commit 64e061b9 authored by Uliana Alekseeva's avatar Uliana Alekseeva

bugfix in chase_diag

parent 275f45b1
...@@ -473,6 +473,7 @@ CONTAINS ...@@ -473,6 +473,7 @@ CONTAINS
EXTERNAL blacs_pinfo, blacs_gridinit EXTERNAL blacs_pinfo, blacs_gridinit
INTEGER,EXTERNAL::numroc,indxl2g INTEGER,EXTERNAL::numroc,indxl2g
ALLOCATE(mat%blacsdata)
mat%blacsdata%mpi_com=hmat%blacsdata%mpi_com mat%blacsdata%mpi_com=hmat%blacsdata%mpi_com
mat%global_size1=hmat%global_size1 mat%global_size1=hmat%global_size1
mat%global_size2=hmat%global_size1 mat%global_size2=hmat%global_size1
......
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