C
C SUBROUTINE 'IMPCLS'
C ===================
C
C CLOSE IMAGE PLATE FILE
C
      SUBROUTINE IMPCLS(IUN)
C
C PARAMETERS
C
C         IUN (I)   FORTRAN UNIT NO. FOR IMAGE PLATE FILE
C
C ***GENERAL VERSION***
C
C SPECIFICATION STATEMENTS AND CODE
C ---------------------------------
C
      CLOSE (UNIT=IUN)
      RETURN
      END