Zero indices which will be checked by maxval

While part_array may not matter anymore, ndimi and ndimj from
the halo structure will.

src/matrix_module.f90

@@ -673,6 +673,8 @@ contains
     if(stat/=0) then
        call cq_abort('alloc_halo: error allocating ndimi')
     endif
+    halo%ndimi = 0
+    halo%ndimj = 0
     call stop_timer(tmr_std_allocation)
     return
   end subroutine allocate_halo

src/multiply_module.f90

@@ -240,6 +240,8 @@ contains
              lenb_rem = a_b_c%comms%ilen3rec(ipart,nnode)
           end if
           allocate(b_rem(lenb_rem))
+          part_array = 0
+          b_rem = zero
           call prefetch(kpart,a_b_c%ahalo,a_b_c%comms,a_b_c%bmat,icall,&
                n_cont,part_array,a_b_c%bindex,b_rem,lenb_rem,b,myid,ilen2,&
                mx_msg_per_part,a_b_c%parts,a_b_c%prim,a_b_c%gcs,(recv_part(nnode)-1)*2)