Debug data file
nsubs........................> 45
 $debug
  option='all     '
  iprtall=1
  nsubs=45
  subs(  1)='glgnzro '  ,iprt(  1)=0
  subs(  2)='pn      '  ,iprt(  2)=0
  subs(  3)='bfpmatri'  ,iprt(  3)=0
  subs(  4)='boundari'  ,iprt(  4)=0
  subs(  5)='calcparm'  ,iprt(  5)=0
  subs(  6)='cid     '  ,iprt(  6)=0
  subs(  7)='cleb    '  ,iprt(  7)=0
  subs(  8)='close_sy'  ,iprt(  8)=0
  subs(  9)='coupling'  ,iprt(  9)=0
  subs( 10)='define_s'  ,iprt( 10)=0
  subs( 11)='figure  '  ,iprt( 11)=0
  subs( 12)='get_host'  ,iprt( 12)=0
  subs( 13)='glegen  '  ,iprt( 13)=0
  subs( 14)='legndr  '  ,iprt( 14)=0
  subs( 15)='logder  '  ,iprt( 15)=0
  subs( 16)='logprop '  ,iprt( 16)=0
  subs( 17)='massfac '  ,iprt( 17)=0
  subs( 18)='ne2sur  '  ,iprt( 18)=0
  subs( 19)='nenedat '  ,iprt( 19)=0
  subs( 20)='numerov '  ,iprt( 20)=0
  subs( 21)='oops_int'  ,iprt( 21)=0
  subs( 22)='overlap '  ,iprt( 22)=0
  subs( 23)='plm     '  ,iprt( 23)=0
  subs( 24)='pot_shit'  ,iprt( 24)=0
  subs( 25)='potdelve'  ,iprt( 25)=0
  subs( 26)='potmat  '  ,iprt( 26)=0
  subs( 27)='potmatn '  ,iprt( 27)=0
  subs( 28)='prop    '  ,iprt( 28)=0
  subs( 29)='psiout  '  ,iprt( 29)=0
  subs( 30)='q1d     '  ,iprt( 30)=0
  subs( 31)='quantum_'  ,iprt( 31)=0
  subs( 32)='rhocalc '  ,iprt( 32)=0
  subs( 33)='rmat_out'  ,iprt( 33)=0
  subs( 34)='sector  '  ,iprt( 34)=0
  subs( 35)='sfpmatri'  ,iprt( 35)=0
  subs( 36)='surface '  ,iprt( 36)=0
  subs( 37)='unit    '  ,iprt( 37)=0
  subs( 38)='vleg_int'  ,iprt( 38)=0
  subs( 39)='vleg_mat'  ,iprt( 39)=0
  subs( 40)='vneh    '  ,iprt( 40)=0
  subs( 41)='vnene   '  ,iprt( 41)=0
  subs( 42)='voops_in'  ,iprt( 42)=0
  subs( 43)='xxpmat  '  ,iprt( 43)=0
  subs( 44)='zbrent  '  ,iprt( 44)=0
  subs( 45)='enlvls  '  ,iprt( 45)=0
 $end