Ajout rint

src/migl/lisp/LispEval.java

@@ -35,6 +35,7 @@ public class LispEval {
 		operators.put("floor", new MathOperator());
 		operators.put("log10", new MathOperator());
 		operators.put("cos", new MathOperator());
+		operators.put("rint", new MathOperator());
 		operators.put("quote", (op, lisp) -> {
 			if(lisp.size() != 1) {
 				throw new LispError(LispError.ERR_NUM_ARG);

src/migl/lisp/operator/MathOperator.java

@@ -24,6 +24,8 @@ public class MathOperator implements LispOperator {
 				return LispElement.generate(Math.log10(elt.toNumber()));
 			case "cos":
 				return LispElement.generate(Math.cos(elt.toNumber()));
+			case "rint":
+				return LispElement.generate(Math.rint(elt.toNumber()));
 			default:
 				throw new LispError(operator + LispError.ERR_UNKNOW);
 		}