diff --git a/base/tools/psb_dsphalo.F90 b/base/tools/psb_dsphalo.F90 index 4d8602bf..38ed63d2 100644 --- a/base/tools/psb_dsphalo.F90 +++ b/base/tools/psb_dsphalo.F90 @@ -35,12 +35,6 @@ !* This routine does the retrieval of remote matrix rows. * !* Note that retrieval is done through GTBLK, therefore it should work * !* for any format. * -!* Currently the output is BLK%FIDA='CSR' but it would take little * -!* work to change that; the pieces are transferred in COO format * -!* thus we would only need a DCSDP at the end to exit in whatever format * -!* is needed. * -!* But I'm feeling soooooo lazy today...... * -!* * !* * !* * !* * diff --git a/base/tools/psb_zsphalo.F90 b/base/tools/psb_zsphalo.F90 index 62183ad8..219a92e7 100644 --- a/base/tools/psb_zsphalo.F90 +++ b/base/tools/psb_zsphalo.F90 @@ -35,12 +35,6 @@ !* This routine does the retrieval of remote matrix rows. * !* Note that retrieval is done through GTBLK, therefore it should work * !* for any format. * -!* Currently the output is BLK%FIDA='CSR' but it would take little * -!* work to change that; the pieces are transferred in COO format * -!* thus we would only need a DCSDP at the end to exit in whatever format * -!* is needed. * -!* But I'm feeling soooooo lazy today...... * -!* * !* * !* * !* *