port digamma function