c Arrays and variables needed throughout
c---------------------------------------------------------------------------
      character*80   title
      common/probt/  title
      integer        ijac,ipar,ialp,istc,incr,incw
      common/cntrl/  ijac,ipar,ialp,istc,incr,incw
      real           calpha,calpha2,comega,reynolds,rmag,etadf,
     +               ybl,rzc,gamfl
      common/param/  calpha,calpha2,comega,reynolds,rmag,etadf,
     +               ybl,rzc,gamfl
      real           alpsfac,alpsfac2,addnamp
      common/stoch/  alpsfac,alpsfac2,addnamp