#if defined (DOC)
C
C     COMDECK COM1CHN
C
C     Single channel assimilation for specified codtyp
C
#endif

      LOGICAL :: LONECHN
      INTEGER :: NONECHN, NONECODTYP

      COMMON /LSINGLECHN/ LONECHN,NONECHN,NONECODTYP