/*
 * $Id$
 */

package edu.jas.poly;


import org.apache.log4j.Logger;

import edu.jas.structure.RingElem;


/**
 * Generate Relation Table for Weyl Algebras Adds the respective relations to
 * the relation table of the given solvable ring factory. Relations are of the
 * form xj * xi = xi xj + 1.
 * Block form: R{x1,...,xn,y1,...,yn; yi*xi = xi yi + 1}.
 * @author Heinz Kredel.
 */

public class WeylRelations> implements RelationGenerator {


    /**
     * The factory for the solvable polynomial ring.
     */
    private final GenSolvablePolynomialRing ring;


    private static final Logger logger = Logger.getLogger(WeylRelations.class);


    /**
     * The no argument constructor. The relation table of this ring is setup to
     * a Weyl Algebra.
     */
    public WeylRelations() {
        ring = null;
    }


    /**
     * The constructor requires a ring factory. The relation table of this ring
     * is setup to a Weyl Algebra.
     * @param r solvable polynomial ring factory, r must have even number of
     *            variables.
     */
    public WeylRelations(GenSolvablePolynomialRing r) {
        if (r == null) {
            throw new IllegalArgumentException("WeylRelations, ring == null");
        }
        ring = r;
        if (ring.nvar <= 1 || (ring.nvar % 2) != 0) {
            throw new IllegalArgumentException("WeylRelations, wrong nvar = " + ring.nvar);
        }
    }


    /**
     * Generates the relation table of this ring. Block form:
     * R{x1,...,xn,y1,...,yn; yi*xi = xi yi + 1}.
     */
    public void generate() {
        if (ring == null) {
            throw new IllegalArgumentException("WeylRelations, ring == null");
        }
        generate(ring);
    }


    /**
     * Generates the relation table of this ring. Block form:
     * R{x1,...,xn,y1,...,yn; yi*xi = xi yi + 1}.
     * @param ring solvable polynomial ring factory, ring must have even number
     *            of variables.
     * @see edu.jas.poly.RelationGenerator#generate(edu.jas.poly.GenSolvablePolynomialRing)
     */
    @Override
    public void generate(GenSolvablePolynomialRing ring) {
        if (ring == null) {
            throw new IllegalArgumentException("WeylRelations, ring == null");
        }
        if (ring.nvar <= 1 || (ring.nvar % 2) != 0) {
            throw new IllegalArgumentException("WeylRelations, wrong nvar = " + ring.nvar);
        }
        RelationTable table = ring.table;
        int r = ring.nvar;
        int m = r / 2;
        GenSolvablePolynomial one = ring.getONE().copy();
        GenSolvablePolynomial zero = ring.getZERO().copy();
        for (int i = m; i < r; i++) {
            ExpVector f = ExpVector.create(r, i, 1);
            int j = i - m;
            ExpVector e = ExpVector.create(r, j, 1);
            ExpVector ef = e.sum(f);
            GenSolvablePolynomial b = one.multiply(ef);
            GenSolvablePolynomial rel = (GenSolvablePolynomial) b.sum(one);
            //  = (GenSolvablePolynomial)b.subtract(one);
            if (rel.isZERO()) {
                logger.info("ring = " + ring);
                logger.info("one  = " + one);
                logger.info("zero = " + zero);
                logger.info("b    = " + b);
                logger.info("rel  = " + rel);
                //System.exit(1);
                throw new RuntimeException("rel.isZERO()");
            }
            //System.out.println("rel = " + rel.toString(ring.vars));
            table.update(e, f, rel);
        }
        if (logger.isDebugEnabled()) {
            logger.debug("\nWeyl relations = " + table);
        }
        return;
    }

}