domain_setsame

INTERFACE:

   subroutine domain_setsame(domain1,domain2)

DESCRIPTION:

This subroutine copies parts of domain2 = domain1 specifically for setting a finemesh lats/lons to coarsemesh grid

USES:

ARGUMENTS:

     implicit none
     type(domain_type),intent(in)    :: domain1        ! domain datatype
     type(domain_type),intent(inout) :: domain2        ! domain datatype

REVISION HISTORY:

     Created by T Craig

LOCAL VARIABLES: