INTERFACE:
subroutine domain_clean(domain)DESCRIPTION:
This subroutine deallocates the domain type
USES:
ARGUMENTS:
implicit none
type(domain_type) :: domain ! domain datatype
REVISION HISTORY:
Created by T CraigLOCAL VARIABLES: