← Back to branch summary

~amcg-stokes/fluidity/multimaterial_diagnostic_dependencies

« back to all changes in this revision

Viewing changes to femtools/Halos_Registration.F90

  • Committer: Cian Wilson
  • Date: 2012-12-10 20:21:07 UTC
  • mfrom: (4132.1.7 fluidity)
  • Revision ID: cwilson@ldeo.columbia.edu-20121210202107-5wppwqcba4bfd1r3
Merging in changes from lp:fluidity.

Show diffs side-by-side

added added

removed removed

Lines of Context:
femtools/Halos_Registration.F90
250
250
    type(mesh_type), intent(inout) :: subdomain_mesh
251
251
    integer, dimension(:) :: node_list, inverse_node_list 
252
252
 
253
 
    type(integer_set), dimension(:), allocatable :: subdomain_mesh_sends_indices
254
 
    type(integer_set), dimension(:), allocatable :: subdomain_mesh_receives_indices
255
 
 
256
 
    integer, dimension(:), allocatable :: subdomain_mesh_nreceives, subdomain_mesh_nsends
257
 
    integer, dimension(:), allocatable :: subdomain_mesh_receives, subdomain_mesh_sends
258
 
 
259
 
    integer, dimension(:), allocatable :: external_mesh_nreceives, external_mesh_nsends
260
 
    integer, dimension(:), allocatable :: external_mesh_receives, external_mesh_sends
261
 
 
262
 
    integer, dimension(:), allocatable :: external_mesh_sends_indices 
263
 
    integer, dimension(:), allocatable :: external_mesh_receives_indices
264
 
 
265
253
    integer :: nhalos, communicator, nprocs, procno, ihalo, inode, iproc, nowned_nodes
266
254
 
267
255
    ewrite(1, *) "In generate_substate_halos"