• Home
• com.github.dakusui
• logiaslisp
• 1.0
• source code
• Divide.java

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

com.github.dakusui.logias.lisp.func.util.calc.Divide Maven / Gradle / Ivy

package com.github.dakusui.logias.lisp.func.util.calc;

import com.github.dakusui.logias.lisp.func.util.Op;
import com.github.dakusui.logias.lisp.s.Literal;
import com.github.dakusui.logias.lisp.s.Sexp;


public class Divide extends Op {
	protected Sexp calc(Literal... params) {
		boolean first = true;
		double value = 0;
		for (Literal cur : params) {
			if (first) {
				value = cur.doubleValue();
				first = false;
			} else {
				value -= cur.doubleValue();
			}
		}
		Sexp ret = new Literal(value);
		return ret;
	}
}