|
|
|
@ -446,6 +446,10 @@ contains
|
|
|
|
|
write (0,'("MPI error:",i0)')i_e_d(1)
|
|
|
|
|
case(550)
|
|
|
|
|
write (0,'("Parameter n. ",i0," must be equal on all BLACS processes. ",i0)')i_e_d(1)
|
|
|
|
|
case(551)
|
|
|
|
|
write (0,'("Entry n. ",i0," out of ",i0," should be between 1 and ",i0," but is ",i0)')i_e_d(1),i_e_d(3),i_e_d(4),i_e_d(2)
|
|
|
|
|
case(552)
|
|
|
|
|
write (0,'("Index lists are inconsistent: some indices are orphans")')
|
|
|
|
|
case(570)
|
|
|
|
|
write (0,'("partition function passed as input argument n. ",i0," returns number of processes")')i_e_d(1)
|
|
|
|
|
write (0,'("greater than No of grid s processes on global point ",i0,". Actual number of grid s ")')i_e_d(4)
|
|
|
|
|