diff --git a/base/modules/desc/psb_gen_block_map_mod.F90 b/base/modules/desc/psb_gen_block_map_mod.F90 index 2238f1cf..39be9e64 100644 --- a/base/modules/desc/psb_gen_block_map_mod.F90 +++ b/base/modules/desc/psb_gen_block_map_mod.F90 @@ -2005,7 +2005,7 @@ contains idxmap%local_cols = nl idxmap%ictxt = ictxt idxmap%state = psb_desc_bld_ - idxmap%mpic = psb_get_mpicomm(ictxt) + idxmap%mpic = psb_get_mpicomm(ictxt) idxmap%min_glob_row = vnl(iam)+1 idxmap%max_glob_row = vnl(iam+1) call move_alloc(vnl,idxmap%vnl)