routine.txt 532 Bytes
!-----------------------------------------------------------------------
!BOP
!
! !ROUTINE:  
! 
! !INTERFACE:
   SUBROUTINE 
!
! !DESCRIPTION: 
!
! !USES:
   IMPLICIT NONE
!
! !INPUT PARAMETERS:
   INTEGER, INTENT(IN)					:: N
   DOUBLE PRECISION, INTENT(IN)				::
!
! !INPUT/OUTPUT PARAMETERS:
!
! !OUTPUT PARAMETERS:
!
! !REVISION HISTORY:
!  Author(s): 
!  01Jan2000: Ver. ?.?.? (
!
! !LOCAL VARIABLES:
! 
!EOP
!-----------------------------------------------------------------------
!BOC
      RETURN
      END SUBROUTINE
!EOC