FORTRAN code of PS Power and Sample Size Program