!-----------------------------------------------------------------------
! INCLUDE comcstVE.h

        integer nnuve,nbztopve,nbpsve,nbmat
        parameter (nnuve=68)   ! fichiers Vincent et Bullock
        parameter (nbpsve=16)   ! number of psurf in Vincent's matrixes
        parameter (nbztopve=4) ! number of ztop  in Vincent's matrixes
        parameter (nbmat=nbztopve*nbpsve) ! number of matrixes in Vincent's file

      common/comcstVE/al,bl,ztopve,psurfve

      real   al(nnuve),bl(nnuve)      ! for Planck luminances calculations
      real   ztopve(nbmat)   ! cloud top altitude in matrixes (km)
      real   psurfve(nbmat)            ! surface pressure in matrixes (Pa)


!-----------------------------------------------------------------------