<p><b>croesch@ucar.edu</b> 2012-02-02 17:28:54 -0700 (Thu, 02 Feb 2012)</p><p>BRANCH COMMIT - moved dmpar types to a file of their own<br>
<br>
A    src/framework/mpas_dmpar_types.F<br>
</p><hr noshade><pre><font color="gray">Added: branches/omp_blocks/new_halo/src/framework/mpas_dmpar_types.F
===================================================================
--- branches/omp_blocks/new_halo/src/framework/mpas_dmpar_types.F                                (rev 0)
+++ branches/omp_blocks/new_halo/src/framework/mpas_dmpar_types.F        2012-02-03 00:28:54 UTC (rev 1459)
@@ -0,0 +1,23 @@
+module mpas_dmpar_types
+
+   use mpas_kind_types
+
+
+   type dm_info
+      integer :: nprocs, my_proc_id, comm, info
+      logical :: using_external_comm
+   end type dm_info
+
+
+   type exchange_list
+      integer :: procID
+      integer :: blockID
+      integer :: nlist
+      integer, dimension(:), pointer :: list
+      type (exchange_list), pointer :: next
+      real (kind=RKIND), dimension(:), pointer :: rbuffer
+      integer, dimension(:), pointer           :: ibuffer
+      integer :: reqID
+   end type exchange_list
+
+end module mpas_dmpar_types

</font>
</pre>