!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
      real zu,zt
      data zu,zt/ 10.,1.5 /
      save zu,zt