!
! $Header$
!
      character *120 descript
      common /titre/descript