!**********************************************************************

!	diffusion.h
	
!**********************************************************************

      integer ncompdiff
      integer nmajdiff,nmindiff
      integer idifflow
      real*8 tdiffmin
      real*8 dzres

!      parameter (ncomptot=ncomp+1)	
      parameter (ncompdiff=16)
!      parameter (nmajdiff=4)
!      parameter (nmindiff=ncompdiff-nmajdiff)
      parameter (idifflow=20)
      parameter (tdiffmin=5d0)
      parameter (dzres=4d0)