How to use

selfExpand

method

in

jscl.math.function.Ln

public Generic selfElementary() {
  return selfExpand();
}

public Generic antiDerivative(int n) throws NotIntegrableException {
  return parameters[0].multiply(new Ln(parameters[0]).selfExpand().subtract(JsclInteger.ONE));
}

public Generic derivative(int n) {
  if (n == 0) {
    return new Pow(parameters[0], parameters[1].subtract(JsclInteger.valueOf(1))).selfExpand().multiply(parameters[1]);
  } else {
    return new Pow(parameters[0], parameters[1]).selfExpand().multiply(new Ln(parameters[0]).selfExpand());
  }
}

public Generic antiDerivative(int n) throws NotIntegrableException {
  if (n == 0) {
    return new Pow(parameters[0], parameters[1].add(JsclInteger.valueOf(1))).selfExpand().multiply(new Inverse(parameters[1].add(JsclInteger.valueOf(1))).selfExpand());
  } else {
    return new Pow(parameters[0], parameters[1]).selfExpand().multiply(new Inverse(new Ln(parameters[0]).selfExpand()).selfExpand());
  }
}

Generic trager(Generic a, Generic d) {
  Debug.println("trager(" + a + ", " + d + ")");
  Variable t = new TechnicalVariable("t");
  UnivariatePolynomial pd = (UnivariatePolynomial) factory.valueOf(d);
  UnivariatePolynomial pa = (UnivariatePolynomial) factory.valueOf(a).subtract(pd.derivative().multiply(t.expressionValue()));
  UnivariatePolynomial rs[] = pd.remainderSequence(pa);
  Polynomial fact = UnivariatePolynomial.factory(t);
  for (int i = 0; i < rs.length; i++)
    if (rs[i] != null)
      rs[i] = (UnivariatePolynomial) fact.valueOf((i > 0 ? rs[i].normalize() : rs[i]).genericValue());
  UnivariatePolynomial q[] = rs[0].squarefreeDecomposition();
  int m = q.length - 1;
  Generic s = JsclInteger.valueOf(0);
  for (int i = 1; i <= m; i++) {
    for (int j = 0; j < q[i].degree(); j++) {
      Generic a2 = new Root(q[i], j).selfExpand();
      s = s.add(a2.multiply(new Ln(i == pd.degree() ? d : rs[i].substitute(a2)).selfExpand()));
    }
  }
  return s;
}