*** empty log message ***

This commit is contained in:
Alfredo Buttari
2005-09-16 09:01:40 +00:00
parent cd656f8f4b
commit 6f2ca4384d
12 changed files with 47 additions and 27 deletions
+1
View File
@@ -140,6 +140,7 @@ subroutine psb_dscasb(desc_a,info)
& nhalo,lhalo,halo_index(lhalo)
!.... convert comunication stuctures....
! first the halo index
call psi_crea_index(desc_a,halo_index,&
& desc_a%halo_index,.false.,info)
if(info.ne.0) then