!----------------------------------------------------------------------- 
!BOP
! !ROUTINE:  trunc --- Check consistency of truncation parameters
!
! !INTERFACE:

subroutine trunc 1

! !USES:
   implicit none

!
! !DESCRIPTION:
!
!   Check consistency of truncation parameters and evaluate pointers
!   and displacements for spectral arrays.  Note: this may not be
!   necessary for Lin-Rood. 
! 
! !REVISION HISTORY: 
!   92.06.01  Bath             Standardized (from CCM1)
!   92.08.01  Hack/Williamson  Reviewed
!   96.03.01  Acker            Modified
!   96.04.01  Hack/Williamson  Reviewed
!   02.04.04  Sawyer           Not needed by FV -- turned into stub
!
!EOP
!-----------------------------------------------------------------------
!BOC
!
   return
!EOC
end subroutine trunc
!-----------------------------------------------------------------------