DB<1> $| = 1
 
  DB<2> x print "horst"
horst0  1
  DB<3> p print "horst"
horst1
  DB<4>  print "horst"
horst