This commit was generated by cvs2svn to compensate for changes in r2,

[u/mrichter/AliRoot.git] / PHOS / shaker / shfphi.f

*CMZ :          17/07/98  15.49.05  by  Federico Carminati
*-- Author :
      FUNCTION SHFPHI(X)
c       ==================

      SHFPHI = SHMTSC(ULMASS(333),X)
      RETURN
      END