/* ************************************************************** * C++ Mathematical Expression Toolkit Library * * * * Examples and Unit-Tests * * Author: Arash Partow (1999-2014) * * URL: http://www.partow.net/programming/exprtk/index.html * * * * Copyright notice: * * Free use of the Mathematical Expression Toolkit Library is * * permitted under the guidelines and in accordance with the * * most current version of the Common Public License. * * http://www.opensource.org/licenses/cpl1.0.php * * * ************************************************************** */ #include #include #include #include #include #include #include #include #include "exprtk.hpp" typedef double numeric_type; typedef std::pair test_t; static const test_t test_list[] = { // Note: Each of following tests should compile down // to a single literal node. test_t("0",0.0), test_t("1",1.0), test_t("2",2.0), test_t("3",3.0), test_t("4",4.0), test_t("5",5.0), test_t("6",6.0), test_t("7",7.0), test_t("8",8.0), test_t("9",9.0), test_t("12.12",12.12), test_t("123.123",123.123), test_t("1234.1234",1234.1234), test_t("12345.12345",12345.12345), test_t("123456.123456",123456.123456), test_t("0.0",0.0), test_t("1.0",1.0), test_t("2.0",2.0), test_t("3.0",3.0), test_t("4.0",4.0), test_t("5.0",5.0), test_t("6.0",6.0), test_t("7.0",7.0), test_t("8.0",8.0), test_t("9.0",9.0), test_t("0.0",0.0), test_t("1.1",1.1), test_t("2.2",2.2), test_t("3.3",3.3), test_t("4.4",4.4), test_t("5.5",5.5), test_t("6.6",6.6), test_t("7.7",7.7), test_t("8.8",8.8), test_t("9.9",9.9), test_t("+0",0.0), test_t("+1",1.0), test_t("+2",2.0), test_t("+3",3.0), test_t("+4",4.0), test_t("+5",5.0), test_t("+6",6.0), test_t("+7",7.0), test_t("+8",8.0), test_t("+9",9.0), test_t("+0.0",0.0), test_t("+1.0",1.0), test_t("+2.0",2.0), test_t("+3.0",3.0), test_t("+4.0",4.0), test_t("+5.0",5.0), test_t("+6.0",6.0), test_t("+7.0",7.0), test_t("+8.0",8.0), test_t("+9.0",9.0), test_t("+0.0",0.0), test_t("+1.1",1.1), test_t("+2.2",2.2), test_t("+3.3",3.3), test_t("+4.4",4.4), test_t("+5.5",5.5), test_t("+6.6",6.6), test_t("+7.7",7.7), test_t("+8.8",8.8), test_t("+9.9",9.9), test_t("-0",-0.0), test_t("-1",-1.0), test_t("-2",-2.0), test_t("-3",-3.0), test_t("-4",-4.0), test_t("-5",-5.0), test_t("-6",-6.0), test_t("-7",-7.0), test_t("-8",-8.0), test_t("-9",-9.0), test_t("-0.0",-0.0), test_t("-1.0",-1.0), test_t("-2.0",-2.0), test_t("-3.0",-3.0), test_t("-4.0",-4.0), test_t("-5.0",-5.0), test_t("-6.0",-6.0), test_t("-7.0",-7.0), test_t("-8.0",-8.0), test_t("-9.0",-9.0), test_t("-0.0",-0.0), test_t("-1.1",-1.1), test_t("-2.2",-2.2), test_t("-3.3",-3.3), test_t("-4.4",-4.4), test_t("-5.5",-5.5), test_t("-6.6",-6.6), test_t("-7.7",-7.7), test_t("-8.8",-8.8), test_t("-9.9",-9.9), test_t("0.0e+0",+0.0e+0), test_t("1.1e+1",+1.1e+1), test_t("2.2e+2",+2.2e+2), test_t("3.3e+3",+3.3e+3), test_t("4.4e+4",+4.4e+4), test_t("5.5e+5",+5.5e+5), test_t("6.6e+6",+6.6e+6), test_t("7.7e+7",+7.7e+7), test_t("8.8e+8",+8.8e+8), test_t("9.9e+9",+9.9e+9), test_t("-0.0e+0",-0.0e+0), test_t("-1.1e+1",-1.1e+1), test_t("-2.2e+2",-2.2e+2), test_t("-3.3e+3",-3.3e+3), test_t("-4.4e+4",-4.4e+4), test_t("-5.5e+5",-5.5e+5), test_t("-6.6e+6",-6.6e+6), test_t("-7.7e+7",-7.7e+7), test_t("-8.8e+8",-8.8e+8), test_t("-9.9e+9",-9.9e+9), test_t("0.0E+0",+0.0E+0), test_t("1.1E+1",+1.1E+1), test_t("2.2E+2",+2.2E+2), test_t("3.3E+3",+3.3E+3), test_t("4.4E+4",+4.4E+4), test_t("5.5E+5",+5.5E+5), test_t("6.6E+6",+6.6E+6), test_t("7.7E+7",+7.7E+7), test_t("8.8E+8",+8.8E+8), test_t("9.9E+9",+9.9E+9), test_t("-0.0E+0",-0.0E+0), test_t("-1.1E+1",-1.1E+1), test_t("-2.2E+2",-2.2E+2), test_t("-3.3E+3",-3.3E+3), test_t("-4.4E+4",-4.4E+4), test_t("-5.5E+5",-5.5E+5), test_t("-6.6E+6",-6.6E+6), test_t("-7.7E+7",-7.7E+7), test_t("-8.8E+8",-8.8E+8), test_t("-9.9E+9",-9.9E+9), test_t("(0)",0.0), test_t("(1)",1.0), test_t("(2)",2.0), test_t("(3)",3.0), test_t("(4)",4.0), test_t("(5)",5.0), test_t("(6)",6.0), test_t("(7)",7.0), test_t("(8)",8.0), test_t("(9)",9.0), test_t("(0.0)",0.0), test_t("(1.0)",1.0), test_t("(2.0)",2.0), test_t("(3.0)",3.0), test_t("(4.0)",4.0), test_t("(5.0)",5.0), test_t("(6.0)",6.0), test_t("(7.0)",7.0), test_t("(8.0)",8.0), test_t("(9.0)",9.0), test_t("(0.0)",0.0), test_t("(1.1)",1.1), test_t("(2.2)",2.2), test_t("(3.3)",3.3), test_t("(4.4)",4.4), test_t("(5.5)",5.5), test_t("(6.6)",6.6), test_t("(7.7)",7.7), test_t("(8.8)",8.8), test_t("(9.9)",9.9), test_t("(+0)",0.0), test_t("(+1)",1.0), test_t("(+2)",2.0), test_t("(+3)",3.0), test_t("(+4)",4.0), test_t("(+5)",5.0), test_t("(+6)",6.0), test_t("(+7)",7.0), test_t("(+8)",8.0), test_t("(+9)",9.0), test_t("(+0.0)",0.0), test_t("(+1.0)",1.0), test_t("(+2.0)",2.0), test_t("(+3.0)",3.0), test_t("(+4.0)",4.0), test_t("(+5.0)",5.0), test_t("(+6.0)",6.0), test_t("(+7.0)",7.0), test_t("(+8.0)",8.0), test_t("(+9.0)",9.0), test_t("(+0.0)",0.0), test_t("(+1.1)",1.1), test_t("(+2.2)",2.2), test_t("(+3.3)",3.3), test_t("(+4.4)",4.4), test_t("(+5.5)",5.5), test_t("(+6.6)",6.6), test_t("(+7.7)",7.7), test_t("(+8.8)",8.8), test_t("(+9.9)",9.9), test_t("(-0)",-0.0), test_t("(-1)",-1.0), test_t("(-2)",-2.0), test_t("(-3)",-3.0), test_t("(-4)",-4.0), test_t("(-5)",-5.0), test_t("(-6)",-6.0), test_t("(-7)",-7.0), test_t("(-8)",-8.0), test_t("(-9)",-9.0), test_t("(-0.0)",-0.0), test_t("(-1.0)",-1.0), test_t("(-2.0)",-2.0), test_t("(-3.0)",-3.0), test_t("(-4.0)",-4.0), test_t("(-5.0)",-5.0), test_t("(-6.0)",-6.0), test_t("(-7.0)",-7.0), test_t("(-8.0)",-8.0), test_t("(-9.0)",-9.0), test_t("(-0.0)",-0.0), test_t("(-1.1)",-1.1), test_t("(-2.2)",-2.2), test_t("(-3.3)",-3.3), test_t("(-4.4)",-4.4), test_t("(-5.5)",-5.5), test_t("(-6.6)",-6.6), test_t("(-7.7)",-7.7), test_t("(-8.8)",-8.8), test_t("(-9.9)",-9.9), test_t("-(1.1)",-1.1), test_t("-(1.1+2.2)",-3.3), test_t("1234567890",1234567890), test_t("123456789.0",123456789.0), test_t("+1234567890",1234567890), test_t("+123456789.0",123456789.0), test_t("-1234567890",-1234567890), test_t("-123456789.0",-123456789.0), test_t("1234.567890",1234.567890), test_t("-1234.567890",-1234.567890), test_t("0+9",9.0), test_t("1+8",9.0), test_t("2+7",9.0), test_t("3+6",9.0), test_t("4+5",9.0), test_t("5+4",9.0), test_t("6+3",9.0), test_t("7+2",9.0), test_t("8+1",9.0), test_t("9+0",9.0), test_t(" 0 + 9 ",9.0), test_t(" 1 + 8 ",9.0), test_t(" 2 + 7 ",9.0), test_t(" 3 + 6 ",9.0), test_t(" 4 + 5 ",9.0), test_t(" 5 + 4 ",9.0), test_t(" 6 + 3 ",9.0), test_t(" 7 + 2 ",9.0), test_t(" 8 + 1 ",9.0), test_t(" 9 + 0 ",9.0), test_t("( 0 + 9 )",9.0), test_t("( 1 + 8 )",9.0), test_t("( 2 + 7 )",9.0), test_t("( 3 + 6 )",9.0), test_t("( 4 + 5 )",9.0), test_t("( 5 + 4 )",9.0), test_t("( 6 + 3 )",9.0), test_t("( 7 + 2 )",9.0), test_t("( 8 + 1 )",9.0), test_t("( 9 + 0 )",9.0), test_t("1+2",+3.0), test_t("1-2",-1.0), test_t("1*2",+2.0), test_t("1/2",+0.5), test_t("1.1+2.2", +3.3), test_t("1.1-2.2", -1.1), test_t("1.1*2.2",+2.42), test_t("1.1/2.2", +0.5), test_t("0-9",-9.0), test_t("1-8",-7.0), test_t("2-7",-5.0), test_t("3-6",-3.0), test_t("4-5",-1.0), test_t("5-4",+1.0), test_t("6-3",+3.0), test_t("7-2",+5.0), test_t("8-1",+7.0), test_t("9-0",+9.0), test_t(" 0 - 9 ",-9.0), test_t(" 1 - 8 ",-7.0), test_t(" 2 - 7 ",-5.0), test_t(" 3 - 6 ",-3.0), test_t(" 4 - 5 ",-1.0), test_t(" 5 - 4 ",+1.0), test_t(" 6 - 3 ",+3.0), test_t(" 7 - 2 ",+5.0), test_t(" 8 - 1 ",+7.0), test_t(" 9 - 0 ",+9.0), test_t("( 0 - 9 )",-9.0), test_t("( 1 - 8 )",-7.0), test_t("( 2 - 7 )",-5.0), test_t("( 3 - 6 )",-3.0), test_t("( 4 - 5 )",-1.0), test_t("( 5 - 4 )",+1.0), test_t("( 6 - 3 )",+3.0), test_t("( 7 - 2 )",+5.0), test_t("( 8 - 1 )",+7.0), test_t("( 9 - 0 )",+9.0), test_t("-(1+2)",-3.0), test_t("+(1+2)",+3.0), test_t("+(1-2)",-1.0), test_t("-(1-2)",+1.0), test_t("(-3*-6)",+18.0), test_t("(-6*-3)",+18.0), test_t("-(-3*-6)",-18.0), test_t("-(-6*-3)",-18.0), test_t("1.1+2.2+3.3",+6.6), test_t("+1.1+2.2+3.3",+6.6), test_t("-1.1-2.2-3.3",-6.6), test_t("1.1*2.2*3.3",+7.986), test_t("+1.1*2.2*3.3",+7.986), test_t("-1.1*-2.2*-3.3",-7.986), test_t("1 + 1/2",+1.5), test_t("1 + (1/2)",+1.5), test_t("1.1 + 1.1/2.2",+1.6), test_t("1.1 + (1.1/2.2)",+1.6), test_t("2 * 1/2",+1.0), test_t("2 * (1/2)",+1.0), test_t("2.2 * 1.1/2.2",+1.1), test_t("2.2 * (1.1/2.2)",+1.1), test_t("1^2",1.0), test_t("2^1",2.0), test_t("2^3",8.0), test_t("-2^3",-8.0), test_t("-2^4",-16.0), test_t("(-2)^3",-8.0), test_t("(-2)^4",+16.0), test_t("3^2^4",43046721.0), test_t("1.1^2.2",1.23328630055466251099), test_t("2.2^1.1",2.3804822576003541627), test_t("2.2^3.3",13.48946876053338489127), test_t("3.3^2.2^1.1",17.15193942371376191362), test_t("+3.3^2.2^1.1",17.15193942371376191362), test_t("3.3^+2.2^1.1",17.15193942371376191362), test_t("3.3^2.2^+1.1",17.15193942371376191362), test_t("3.3^2.2^-1.1",1.65127293793867959137), test_t("+3.3^+2.2^-1.1",1.65127293793867959137), test_t("1.1^(1.1 * 2.2)",1.25941916576299080582), test_t("2.2^(1.1 * 3.3)",17.49823848953534759743), test_t("3.3^(1.1 * 2.2)",17.98058156638874965269), test_t("1.1^-2.2/1.1",0.73712884727743375853), test_t("1.1^+2.2/1.1",1.121169364140602282717273261774), test_t("1.1^2.2/+1.1",1.121169364140602282717273261774), test_t("1.1^+2.2/+1.1",1.121169364140602282717273261774), test_t("1.1^+2.2/-1.1",-1.121169364140602282717273261774), test_t("1.1^2.2/-1.1",-1.121169364140602282717273261774), test_t("1.1^+2.2/-1.1",-1.121169364140602282717273261774), test_t("+1.1^-2.2/1.1",0.73712884727743375853), test_t("+1.1^+2.2/1.1",1.121169364140602282717273261774), test_t("+1.1^2.2/+1.1",1.121169364140602282717273261774), test_t("+1.1^+2.2/+1.1",1.121169364140602282717273261774), test_t("+1.1^+2.2/-1.1",-1.121169364140602282717273261774), test_t("+1.1^2.2/-1.1",-1.121169364140602282717273261774), test_t("+1.1^+2.2/-1.1",-1.121169364140602282717273261774), test_t("equal(1.23^3,(1.23 * 1.23 * 1.23))",1.0), test_t("equal(1.23^-3,1/(1.23 * 1.23 * 1.23))",1.0), test_t("equal((2.1 + 1.23^3),(2.1 + [1.23 * 1.23 * 1.23]))",1.0), test_t("equal((2.1 - 1.23^3),(2.1 - [1.23 * 1.23 * 1.23]))",1.0), test_t("equal((2.1 * 1.23^3),(2.1 * [1.23 * 1.23 * 1.23]))",1.0), test_t("equal((2.1 / 1.23^3),(2.1 / [1.23 * 1.23 * 1.23]))",1.0), test_t("equal((1.23^3 + 2.1),({1.23 * 1.23 * 1.23} + 2.1))",1.0), test_t("equal((1.23^3 - 2.1),({1.23 * 1.23 * 1.23} - 2.1))",1.0), test_t("equal((1.23^3 * 2.1),({1.23 * 1.23 * 1.23} * 2.1))",1.0), test_t("equal((1.23^3 / 2.1),({1.23 * 1.23 * 1.23} / 2.1))",1.0), test_t("equal(1.0^(1.0/2.0),sqrt(1.0))",1.0), test_t("equal(1.0^(1.0/2.0),root(1.0,2.0))",1.0), test_t("equal(1.0^(1.0/3.0),root(1.0,3.0))",1.0), test_t("equal(1.0^(1.0/4.0),root(1.0,4.0))",1.0), test_t("equal(1.0^(1.0/5.0),root(1.0,5.0))",1.0), test_t("equal(1.0^(1.0/6.0),root(1.0,6.0))",1.0), test_t("equal(1.0^(1.0/7.0),root(1.0,7.0))",1.0), test_t("equal(1.0^(1.0/8.0),root(1.0,8.0))",1.0), test_t("equal(1.0^(1.0/9.0),root(1.0,9.0))",1.0), test_t("equal(2.0^(1.0/2.0),sqrt(2.0))",1.0), test_t("equal(2.0^(1.0/2.0),root(2.0,2.0))",1.0), test_t("equal(3.0^(1.0/3.0),root(3.0,3.0))",1.0), test_t("equal(4.0^(1.0/4.0),root(4.0,4.0))",1.0), test_t("equal(5.0^(1.0/5.0),root(5.0,5.0))",1.0), test_t("equal(6.0^(1.0/6.0),root(6.0,6.0))",1.0), test_t("equal(7.0^(1.0/7.0),root(7.0,7.0))",1.0), test_t("equal(8.0^(1.0/8.0),root(8.0,8.0))",1.0), test_t("equal(9.0^(1.0/9.0),root(9.0,9.0))",1.0), test_t("1 < 2", 1.0), test_t("1 <= 2", 1.0), test_t("1.1 <= 2.2", 1.0), test_t("(1.0 + 0.1) <= (2.0 + 0.2)", 1.0), test_t("1 > 2", 0.0), test_t("1 >= 2", 0.0), test_t("1.1 >= 2.2", 0.0), test_t("(1.0 + 0.1) >= (2.0 + 0.2)", 0.0), test_t("1 <> 2", 1.0), test_t("1 != 2", 1.0), test_t("1.1 <> 2.2", 1.0), test_t("1.1 != 2.2", 1.0), test_t("(1.0 + 0.1) <> (2.0 + 0.2)", 1.0), test_t("(1.0 + 0.1) != (2.0 + 0.2)", 1.0), test_t("1 == 1", 1.0), test_t("1.1 == 1.1", 1.0), test_t("1 = 1", 1.0), test_t("1.1 = 1.1", 1.0), test_t("1 <> 1", 0.0), test_t("1 != 1", 0.0), test_t("1.1 <> 1.1", 0.0), test_t("1.1 != 1.1", 0.0), test_t("(1.0 + 0.1) <> (1.0 + 0.1)", 0.0), test_t("(1.0 + 0.1) != (1.0 + 0.1)", 0.0), test_t("equal(1.1,1.1)",1.0), test_t("equal(1.1,2.2)",0.0), test_t("not_equal(1.1,1.1)",0.0), test_t("not_equal(1.1,2.2)",1.0), test_t("1 and 1",1.0), test_t("1 and 0",0.0), test_t("0 and 1",0.0), test_t("0 and 0",0.0), test_t("1.0 and 1.0",1.0), test_t("1.0 and 0.0",0.0), test_t("0.0 and 1.0",0.0), test_t("0.0 and 0.0",0.0), test_t("(1 and 1)",1.0), test_t("(1 and 0)",0.0), test_t("(0 and 1)",0.0), test_t("(0 and 0)",0.0), test_t("(1.0 and 1.0)",1.0), test_t("(1.0 and 0.0)",0.0), test_t("(0.0 and 1.0)",0.0), test_t("(0.0 and 0.0)",0.0), test_t("1 or 1",1.0), test_t("1 or 0",1.0), test_t("0 or 1",1.0), test_t("0 or 0",0.0), test_t("1.0 or 1.0",1.0), test_t("1.0 or 0.0",1.0), test_t("0.0 or 1.0",1.0), test_t("0.0 or 0.0",0.0), test_t("(1 or 1)",1.0), test_t("(1 or 0)",1.0), test_t("(0 or 1)",1.0), test_t("(0 or 0)",0.0), test_t("(1.0 or 1.0)",1.0), test_t("(1.0 or 0.0)",1.0), test_t("(0.0 or 1.0)",1.0), test_t("(0.0 or 0.0)",0.0), test_t("1 nand 1",0.0), test_t("1 nand 0",1.0), test_t("0 nand 1",1.0), test_t("0 nand 0",1.0), test_t("1.0 nand 1.0",0.0), test_t("1.0 nand 0.0",1.0), test_t("0.0 nand 1.0",1.0), test_t("0.0 nand 0.0",1.0), test_t("(1 nand 1)",0.0), test_t("(1 nand 0)",1.0), test_t("(0 nand 1)",1.0), test_t("(0 nand 0)",1.0), test_t("(1.0 nand 1.0)",0.0), test_t("(1.0 nand 0.0)",1.0), test_t("(0.0 nand 1.0)",1.0), test_t("(0.0 nand 0.0)",1.0), test_t("1 nor 1",0.0), test_t("1 nor 0",0.0), test_t("0 nor 1",0.0), test_t("0 nor 0",1.0), test_t("1.0 nor 1.0",0.0), test_t("1.0 nor 0.0",0.0), test_t("0.0 nor 1.0",0.0), test_t("0.0 nor 0.0",1.0), test_t("(1 nor 1)",0.0), test_t("(1 nor 0)",0.0), test_t("(0 nor 1)",0.0), test_t("(0 nor 0)",1.0), test_t("(1.0 nor 1.0)",0.0), test_t("(1.0 nor 0.0)",0.0), test_t("(0.0 nor 1.0)",0.0), test_t("(0.0 nor 0.0)",1.0), test_t("0 xor 0",0.0), test_t("0 xor 1",1.0), test_t("1 xor 0",1.0), test_t("1 xor 1",0.0), test_t("0.0 xor 0.0",0.0), test_t("0.0 xor 1.0",1.0), test_t("1.0 xor 0.0",1.0), test_t("1.0 xor 1.0",0.0), test_t("(0 xor 0)",0.0), test_t("(0 xor 1)",1.0), test_t("(1 xor 0)",1.0), test_t("(1 xor 1)",0.0), test_t("(0.0 xor 0.0)",0.0), test_t("(0.0 xor 1.0)",1.0), test_t("(1.0 xor 0.0)",1.0), test_t("(1.0 xor 1.0)",0.0), test_t("1 & 1",1.0), test_t("1 & 0",0.0), test_t("0 & 1",0.0), test_t("0 & 0",0.0), test_t("1.0 & 1.0",1.0), test_t("1.0 & 0.0",0.0), test_t("0.0 & 1.0",0.0), test_t("0.0 & 0.0",0.0), test_t("(1 & 1)",1.0), test_t("(1 & 0)",0.0), test_t("(0 & 1)",0.0), test_t("(0 & 0)",0.0), test_t("(1.0 & 1.0)",1.0), test_t("(1.0 & 0.0)",0.0), test_t("(0.0 & 1.0)",0.0), test_t("(0.0 & 0.0)",0.0), test_t("1 | 1",1.0), test_t("1 | 0",1.0), test_t("0 | 1",1.0), test_t("0 | 0",0.0), test_t("1.0 | 1.0",1.0), test_t("1.0 | 0.0",1.0), test_t("0.0 | 1.0",1.0), test_t("0.0 | 0.0",0.0), test_t("(1 | 1)",1.0), test_t("(1 | 0)",1.0), test_t("(0 | 1)",1.0), test_t("(0 | 0)",0.0), test_t("(1.0 | 1.0)",1.0), test_t("(1.0 | 0.0)",1.0), test_t("(0.0 | 1.0)",1.0), test_t("(0.0 | 0.0)",0.0), test_t("(1 nand 1) == not(1 and 1)",1.0), test_t("(1 nand 0) == not(1 and 0)",1.0), test_t("(0 nand 1) == not(0 and 1)",1.0), test_t("(0 nand 0) == not(0 and 0)",1.0), test_t("(1 nor 1) == not(1 or 1)",1.0), test_t("(1 nor 0) == not(1 or 0)",1.0), test_t("(0 nor 1) == not(0 or 1)",1.0), test_t("(0 nor 0) == not(0 or 0)",1.0), test_t("(1.0 nand 1.0) == not(1.0 and 1.0)",1.0), test_t("(1.0 nand 0.0) == not(1.0 and 0.0)",1.0), test_t("(0.0 nand 1.0) == not(0.0 and 1.0)",1.0), test_t("(0.0 nand 0.0) == not(0.0 and 0.0)",1.0), test_t("(1.0 nor 1.0) == not(1.0 or 1.0)",1.0), test_t("(1.0 nor 0.0) == not(1.0 or 0.0)",1.0), test_t("(0.0 nor 1.0) == not(0.0 or 1.0)",1.0), test_t("(0.0 nor 0.0) == not(0.0 or 0.0)",1.0), test_t("(1 nand 1) == not(1 & 1)",1.0), test_t("(1 nand 0) == not(1 & 0)",1.0), test_t("(0 nand 1) == not(0 & 1)",1.0), test_t("(0 nand 0) == not(0 & 0)",1.0), test_t("(1 nor 1) == not(1 | 1)",1.0), test_t("(1 nor 0) == not(1 | 0)",1.0), test_t("(0 nor 1) == not(0 | 1)",1.0), test_t("(0 nor 0) == not(0 | 0)",1.0), test_t("(1.0 nand 1.0) == not(1.0 & 1.0)",1.0), test_t("(1.0 nand 0.0) == not(1.0 & 0.0)",1.0), test_t("(0.0 nand 1.0) == not(0.0 & 1.0)",1.0), test_t("(0.0 nand 0.0) == not(0.0 & 0.0)",1.0), test_t("(1.0 nor 1.0) == not(1.0 | 1.0)",1.0), test_t("(1.0 nor 0.0) == not(1.0 | 0.0)",1.0), test_t("(0.0 nor 1.0) == not(0.0 | 1.0)",1.0), test_t("(0.0 nor 0.0) == not(0.0 | 0.0)",1.0), test_t("mand(1,1)",1.0), test_t("mand(1,0)",0.0), test_t("mand(0,1)",0.0), test_t("mand(0,0)",0.0), test_t("mand(1.0,1.0)",1.0), test_t("mand(1.0,0.0)",0.0), test_t("mand(0.0,1.0)",0.0), test_t("mand(0.0,0.0)",0.0), test_t("mor(1,1)",1.0), test_t("mor(1,0)",1.0), test_t("mor(0,1)",1.0), test_t("mor(0,0)",0.0), test_t("mor(1.0,1.0)",1.0), test_t("mor(1.0,0.0)",1.0), test_t("mor(0.0,1.0)",1.0), test_t("mor(0.0,0.0)",0.0), test_t("(1 nand 1) == not(mand(1,1))",1.0), test_t("(1 nand 0) == not(mand(1,0))",1.0), test_t("(0 nand 1) == not(mand(0,1))",1.0), test_t("(0 nand 0) == not(mand(0,0))",1.0), test_t("(1 nor 1) == not(mor(1,1))",1.0), test_t("(1 nor 0) == not(mor(1,0))",1.0), test_t("(0 nor 1) == not(mor(0,1))",1.0), test_t("(0 nor 0) == not(mor(0,0))",1.0), test_t("(1.0 nand 1.0) == not(mand(1.0,1.0))",1.0), test_t("(1.0 nand 0.0) == not(mand(1.0,0.0))",1.0), test_t("(0.0 nand 1.0) == not(mand(0.0,1.0))",1.0), test_t("(0.0 nand 0.0) == not(mand(0.0,0.0))",1.0), test_t("(1.0 nor 1.0) == not(mor(1.0,1.0))",1.0), test_t("(1.0 nor 0.0) == not(mor(1.0,0.0))",1.0), test_t("(0.0 nor 1.0) == not(mor(0.0,1.0))",1.0), test_t("(0.0 nor 0.0) == not(mor(0.0,0.0))",1.0), test_t("abs(1)",1.0), test_t("abs(-1)",1.0), test_t("abs(1.0)",1.0), test_t("abs(-1.0)",1.0), test_t("min(1,2)",1.0), test_t("min(1,2,3)",1.0), test_t("min(1,2,3,4)",1.0), test_t("min(1,2,3,4,5)",1.0), test_t("min(1,2,3,4,5,6)",1.0), test_t("min(1.1,2.2)",1.1), test_t("min(1.1,2.2,3.3)",1.1), test_t("min(1.1,2.2,3.3,4.4)",1.1), test_t("min(1.1,2.2,3.3,4.4,5.5)",1.1), test_t("min(1.1,2.2,3.3,4.4,5.5,6.6)",1.1), test_t("min(min(1,2),min(3,4))",1.0), test_t("max(1,2)",2.0), test_t("max(1,2,3)",3.0), test_t("max(1,2,3,4)",4.0), test_t("max(1,2,3,4,5)",5.0), test_t("max(1,2,3,4,5,6)",6.0), test_t("max(1.1,2.2)",2.2), test_t("max(1.1,2.2,3.3)",3.3), test_t("max(1.1,2.2,3.3,4.4)",4.4), test_t("max(1.1,2.2,3.3,4.4,5.5)",5.5), test_t("max(1.1,2.2,3.3,4.4,5.5,6.6)",6.6), test_t("max(max(1,2),max(3,4))",4.0), test_t("avg(1,2)",1.5), test_t("avg(1,2,3)",2.0), test_t("avg(1,2,3,4)",2.5), test_t("avg(1,2,3,4,5)",3.0), test_t("avg(1.1,2.2)",1.65), test_t("avg(1.1,2.2,3.3)",2.2), test_t("avg(1.1,2.2,3.3,4.4)",2.75), test_t("avg(1.1,2.2,3.3,4.4,5.5)",3.3), test_t("avg(1.1,2.2,3.3,4.4,5.5,6.6)",3.85), test_t("sum(1,2)",3.0), test_t("sum(1,2,3)",6.0), test_t("sum(1,2,3,4)",10), test_t("sum(1,2,3,4,5)",15.0), test_t("sum(1,2,3,4,5,6)",21), test_t("sum(1.1,2.2)",3.3), test_t("sum(1.1,2.2,3.3)",6.6), test_t("sum(1.1,2.2,3.3,4.4)",11.0), test_t("sum(1.1,2.2,3.3,4.4,5.5)",16.5), test_t("sum(1.1,2.2,3.3,4.4,5.5,6.6)",23.1), test_t("mul(1,2)",2.0), test_t("mul(1,2,3)",6.0), test_t("mul(1,2,3,4)",24.0), test_t("mul(1,2,3,4,5)",120.0), test_t("mul(1,2,3,4,5,6)",720.0), test_t("mul(1.1,2.2)",2.42), test_t("mul(1.1,2.2,3.3)",7.986), test_t("mul(1.1,2.2,3.3,4.4)",35.1384), test_t("mul(1.1,2.2,3.3,4.4,5.5)",193.2612), test_t("mul(1.1,2.2,3.3,4.4,5.5,6.6)",1275.52392), test_t("equal(sum(1.1,2.2,3.3,4.4,5.5,6.6,7.7,8.8,9.9),(1.1+2.2+3.3+4.4+5.5+6.6+7.7+8.8+9.9))",1.0), test_t("equal(mul(1.1,2.2,3.3,4.4,5.5,6.6,7.7,8.8,9.9),(1.1*2.2*3.3*4.4*5.5*6.6*7.7*8.8*9.9))",1.0), test_t("equal(min(1.1,2.2,3.3,4.4,5.5,6.6,7.7,8.8,9.9),1.1)",1.0), test_t("equal(max(1.1,2.2,3.3,4.4,5.5,6.6,7.7,8.8,9.9),9.9)",1.0), test_t("equal(avg(1.1,2.2,3.3,4.4,5.5,6.6,7.7,8.8,9.9),5.5)",1.0), test_t("floor(1.0)",1.0), test_t("floor(1.1)",1.0), test_t("floor(-1.0)",-1.0), test_t("floor(-1.1)",-2.0), test_t("ceil(1.0)",1.0), test_t("ceil(1.1)",2.0), test_t("ceil(-1.0)",-1.0), test_t("ceil(-1.1)",-1.0), test_t("round(1.1)",1.0), test_t("round(1.49)",1.0), test_t("round(1.5)",2.0), test_t("round(1.9)",2.0), test_t("roundn(1/3,2)",0.33), test_t("roundn(1/3,5)",0.33333), test_t("roundn(2/3,2)",0.67), test_t("roundn(2/3,5)",0.66667), test_t("roundn(1.0/3.0,2.0)",0.33), test_t("roundn(1.0/3.0,5.0)",0.33333), test_t("roundn(2.0/3.0,2.0)",0.67), test_t("roundn(2.0/3.0,5.0)",0.66667), test_t("cos(0.0)",1.0), test_t("sin(0.0)",0.0), test_t("equal(sin(pi/4.0),cos(pi/4.0))",1.0), test_t("equal(sin(pi/6.0),cos(pi/3.0))",1.0), test_t("(sin(pi/4.0) - cos(pi/4.0)) <= epsilon",1.0), test_t("(cos(pi/3.0) - sin(pi/6.0)) <= epsilon",1.0), test_t("sin(deg2rad(30))",0.5), test_t("cos(deg2rad(60))",0.5), test_t("sin(deg2rad(30)) + cos(deg2rad(60))",1.0), test_t("equal(sin(deg2rad(30))/cos(deg2rad(30)),tan(deg2rad(30)))",1.0), test_t("equal(sinh(pi),11.5487393572577483779773343153884) ",1.0), test_t("equal(asinh(11.5487393572577483779773343153884),pi)",1.0), test_t("equal(cosh(pi),11.5919532755215206277517520525601) ",1.0), test_t("equal(acosh(11.5919532755215206277517520525601),pi)",1.0), test_t("equal(tanh(pi),0.99627207622074994426469058001253) ",1.0), test_t("equal(atanh(0.99627207622074994426469058001253),pi)",1.0), test_t("exp(1.0)",2.71828182845904523536028747135266249775724), test_t("exp(0.0)",1.0), test_t("log(2.7182818284590451)",1.0), test_t("log10(10.0)",1.0), test_t("frac(12.34) + trunc(12.34)",12.34), test_t("hypot(3.0,4.0)",5.0), test_t("hypot(1.0,sqrt(3.0))",2.0), test_t("if(1 < 2, 3, 4)",3.0), test_t("if(1.1 < 2.2, 3.3, 4.4)",3.3), test_t("if((1.0+1.1) < (2.0+1.2), 3.3, 4.4)",3.3), test_t("if(1 = 2, 3, 4)",4.0), test_t("if(1.1 = 2.2, 3.3, 4.4)",4.4), test_t("if((1.0+1.1) = (2.0+1.2), 3.3, 4.4)",4.4), test_t("if(1 == 2, 3, 4)",4.0), test_t("if(1.1 == 2.2, 3.3, 4.4)",4.4), test_t("if((1.0+1.1) == (2.0+1.2), 3.3, 4.4)",4.4), test_t("if(1 >= 2, 3, 4)",4.0), test_t("if(1.1 >= 2.2, 3.3, 4.4)",4.4), test_t("if((1.0+1.1) >= (2.0+1.2), 3.3, 4.4)",4.4), test_t("if(((1.0 + 2.0) == 3.0) and ((4.0 + 5.0) < 9.0),1,2)",2.0), test_t("(3.0 - 1.0 - 2.0) == ((3.0 - 1.0) - 2.0)",1.0), test_t("true == true",1.0), test_t("false == false",1.0), test_t("true != false",1.0), test_t("false != true",1.0), test_t("(1 < 2) == true",1.0), test_t("(1 > 2) == false",1.0), test_t("true == (1 < 2)",1.0), test_t("false == (1 > 2)",1.0), test_t("(1 > 2) != true",1.0), test_t("(1 < 2) != false",1.0), test_t("true != (1 > 2)",1.0), test_t("false != (1 < 2)",1.0), test_t("(true and true) == true",1.0), test_t("(false and false) == false",1.0), test_t("(true or true) == true",1.0), test_t("(false or false) == false",1.0), test_t("(true and false) == false",1.0), test_t("(false and true) == false",1.0), test_t("(true or false) == true",1.0), test_t("(false or true) == true",1.0), test_t("(true & true) == true",1.0), test_t("(false & false) == false",1.0), test_t("(true | true) == true",1.0), test_t("(false | false) == false",1.0), test_t("(true & false) == false",1.0), test_t("(false & true) == false",1.0), test_t("(true | false) == true",1.0), test_t("(false | true) == true",1.0), test_t("clamp(-1,1,+1)",1.0), test_t("clamp(-1,-1.5,+1.0)",-1.0), test_t("clamp(-1,+1.5,+1.0)",+1.0), test_t("clamp(-1,-1.5,+1.0) + clamp(-1,+1.5,+1.0)",0.0), test_t("inrange(-2,1,+2) == ((-2 <= 1) and (1 <= +2))",1.0), test_t("inrange(-2,1,+2) == if(({-2 <= 1} and [1 <= +2]),1.0,0.0)",1.0), test_t("sgn( 0)", 0.0), test_t("sgn(+3)",+1.0), test_t("sgn(-3)",-1.0), test_t("equal($f00(1.1,2.2,3.3),(1.1+2.2)/3.3)",1.0), test_t("equal($f01(1.1,2.2,3.3),(1.1+2.2)*3.3)",1.0), test_t("equal($f02(1.1,2.2,3.3),(1.1+2.2)-3.3)",1.0), test_t("equal($f03(1.1,2.2,3.3),(1.1+2.2)+3.3)",1.0), test_t("equal($f04(1.1,2.2,3.3),(1.1-2.2)+3.3)",1.0), test_t("equal($f05(1.1,2.2,3.3),(1.1-2.2)/3.3)",1.0), test_t("equal($f06(1.1,2.2,3.3),(1.1-2.2)*3.3)",1.0), test_t("equal($f07(1.1,2.2,3.3),(1.1*2.2)+3.3)",1.0), test_t("equal($f08(1.1,2.2,3.3),(1.1*2.2)-3.3)",1.0), test_t("equal($f09(1.1,2.2,3.3),(1.1*2.2)/3.3)",1.0), test_t("equal($f10(1.1,2.2,3.3),(1.1*2.2)*3.3)",1.0), test_t("equal($f11(1.1,2.2,3.3),(1.1/2.2)+3.3)",1.0), test_t("equal($f12(1.1,2.2,3.3),(1.1/2.2)-3.3)",1.0), test_t("equal($f13(1.1,2.2,3.3),(1.1/2.2)/3.3)",1.0), test_t("equal($f14(1.1,2.2,3.3),(1.1/2.2)*3.3)",1.0), test_t("equal($f15(1.1,2.2,3.3),1.1/(2.2+3.3))",1.0), test_t("equal($f16(1.1,2.2,3.3),1.1/(2.2-3.3))",1.0), test_t("equal($f17(1.1,2.2,3.3),1.1/(2.2*3.3))",1.0), test_t("equal($f18(1.1,2.2,3.3),1.1/(2.2/3.3))",1.0), test_t("equal($f19(1.1,2.2,3.3),1.1*(2.2+3.3))",1.0), test_t("equal($f20(1.1,2.2,3.3),1.1*(2.2-3.3))",1.0), test_t("equal($f21(1.1,2.2,3.3),1.1*(2.2*3.3))",1.0), test_t("equal($f22(1.1,2.2,3.3),1.1*(2.2/3.3))",1.0), test_t("equal($f23(1.1,2.2,3.3),1.1-(2.2+3.3))",1.0), test_t("equal($f24(1.1,2.2,3.3),1.1-(2.2-3.3))",1.0), test_t("equal($f25(1.1,2.2,3.3),1.1-(2.2/3.3))",1.0), test_t("equal($f26(1.1,2.2,3.3),1.1-(2.2*3.3))",1.0), test_t("equal($f27(1.1,2.2,3.3),1.1+(2.2*3.3))",1.0), test_t("equal($f28(1.1,2.2,3.3),1.1+(2.2/3.3))",1.0), test_t("equal($f29(1.1,2.2,3.3),1.1+(2.2+3.3))",1.0), test_t("equal($f30(1.1,2.2,3.3),1.1+(2.2-3.3))",1.0), test_t("equal($f31(1.1,2.2,3.3),1.1*2.2^2+3.3)",1.0), test_t("equal($f32(1.1,2.2,3.3),1.1*2.2^3+3.3)",1.0), test_t("equal($f33(1.1,2.2,3.3),1.1*2.2^4+3.3)",1.0), test_t("equal($f34(1.1,2.2,3.3),1.1*2.2^5+3.3)",1.0), test_t("equal($f35(1.1,2.2,3.3),1.1*2.2^6+3.3)",1.0), test_t("equal($f36(1.1,2.2,3.3),1.1*2.2^7+3.3)",1.0), test_t("equal($f37(1.1,2.2,3.3),1.1*2.2^8+3.3)",1.0), test_t("equal($f38(1.1,2.2,3.3),1.1*2.2^9+3.3)",1.0), test_t("equal($f39(1.1,2.2,3.3),1.1*log(2.2)+3.3)",1.0), test_t("equal($f40(1.1,2.2,3.3),1.1*log(2.2)-3.3)",1.0), test_t("equal($f41(1.1,2.2,3.3),1.1*log10(2.2)+3.3)",1.0), test_t("equal($f42(1.1,2.2,3.3),1.1*log10(2.2)-3.3)",1.0), test_t("equal($f43(1.1,2.2,3.3),1.1*sin(2.2)+3.3)",1.0), test_t("equal($f44(1.1,2.2,3.3),1.1*sin(2.2)-3.3)",1.0), test_t("equal($f45(1.1,2.2,3.3),1.1*cos(2.2)+3.3)",1.0), test_t("equal($f46(1.1,2.2,3.3),1.1*cos(2.2)-3.3)",1.0), test_t("equal($f47(1.1,2.2,3.3),if(0!=1.1,2.2,3.3))",1.0), test_t("equal($f48(1.1,2.2,3.3,4.4),1.1+((2.2+3.3)/4.4))",1.0), test_t("equal($f49(1.1,2.2,3.3,4.4),1.1+((2.2+3.3)*4.4))",1.0), test_t("equal($f50(1.1,2.2,3.3,4.4),1.1+((2.2-3.3)/4.4))",1.0), test_t("equal($f51(1.1,2.2,3.3,4.4),1.1+((2.2-3.3)*4.4))",1.0), test_t("equal($f52(1.1,2.2,3.3,4.4),1.1+((2.2*3.3)/4.4))",1.0), test_t("equal($f53(1.1,2.2,3.3,4.4),1.1+((2.2*3.3)*4.4))",1.0), test_t("equal($f54(1.1,2.2,3.3,4.4),1.1+((2.2/3.3)+4.4))",1.0), test_t("equal($f55(1.1,2.2,3.3,4.4),1.1+((2.2/3.3)/4.4))",1.0), test_t("equal($f56(1.1,2.2,3.3,4.4),1.1+((2.2/3.3)*4.4))",1.0), test_t("equal($f57(1.1,2.2,3.3,4.4),1.1-((2.2+3.3)/4.4))",1.0), test_t("equal($f58(1.1,2.2,3.3,4.4),1.1-((2.2+3.3)*4.4))",1.0), test_t("equal($f59(1.1,2.2,3.3,4.4),1.1-((2.2-3.3)/4.4))",1.0), test_t("equal($f60(1.1,2.2,3.3,4.4),1.1-((2.2-3.3)*4.4))",1.0), test_t("equal($f61(1.1,2.2,3.3,4.4),1.1-((2.2*3.3)/4.4))",1.0), test_t("equal($f62(1.1,2.2,3.3,4.4),1.1-((2.2*3.3)*4.4))",1.0), test_t("equal($f63(1.1,2.2,3.3,4.4),1.1-((2.2/3.3)/4.4))",1.0), test_t("equal($f64(1.1,2.2,3.3,4.4),1.1-((2.2/3.3)*4.4))",1.0), test_t("equal($f65(1.1,2.2,3.3,4.4),((1.1+2.2)*3.3)-4.4)",1.0), test_t("equal($f66(1.1,2.2,3.3,4.4),((1.1-2.2)*3.3)-4.4)",1.0), test_t("equal($f67(1.1,2.2,3.3,4.4),((1.1*2.2)*3.3)-4.4)",1.0), test_t("equal($f68(1.1,2.2,3.3,4.4),((1.1/2.2)*3.3)-4.4)",1.0), test_t("equal($f69(1.1,2.2,3.3,4.4),((1.1+2.2)/3.3)-4.4)",1.0), test_t("equal($f70(1.1,2.2,3.3,4.4),((1.1-2.2)/3.3)-4.4)",1.0), test_t("equal($f71(1.1,2.2,3.3,4.4),((1.1*2.2)/3.3)-4.4)",1.0), test_t("equal($f72(1.1,2.2,3.3,4.4),((1.1/2.2)/3.3)-4.4)",1.0), test_t("equal($f73(1.1,2.2,3.3,4.4),(1.1*2.2)+(3.3*4.4))",1.0), test_t("equal($f74(1.1,2.2,3.3,4.4),(1.1*2.2)-(3.3*4.4))",1.0), test_t("equal($f75(1.1,2.2,3.3,4.4),(1.1*2.2)+(3.3/4.4))",1.0), test_t("equal($f76(1.1,2.2,3.3,4.4),(1.1*2.2)-(3.3/4.4))",1.0), test_t("equal($f77(1.1,2.2,3.3,4.4),(1.1/2.2)+(3.3/4.4))",1.0), test_t("equal($f78(1.1,2.2,3.3,4.4),(1.1/2.2)-(3.3/4.4))",1.0), test_t("equal($f79(1.1,2.2,3.3,4.4),(1.1/2.2)-(3.3*4.4))",1.0), test_t("equal($f80(1.1,2.2,3.3,4.4),1.1/(2.2+(3.3*4.4)))",1.0), test_t("equal($f81(1.1,2.2,3.3,4.4),1.1/(2.2-(3.3*4.4)))",1.0), test_t("equal($f82(1.1,2.2,3.3,4.4),1.1*(2.2+(3.3*4.4)))",1.0), test_t("equal($f83(1.1,2.2,3.3,4.4),1.1*(2.2-(3.3*4.4)))",1.0), test_t("equal($f84(1.1,2.2,3.3,4.4),1.1*2.2^2+3.3*4.4^2)",1.0), test_t("equal($f85(1.1,2.2,3.3,4.4),1.1*2.2^3+3.3*4.4^3)",1.0), test_t("equal($f86(1.1,2.2,3.3,4.4),1.1*2.2^4+3.3*4.4^4)",1.0), test_t("equal($f87(1.1,2.2,3.3,4.4),1.1*2.2^5+3.3*4.4^5)",1.0), test_t("equal($f88(1.1,2.2,3.3,4.4),1.1*2.2^6+3.3*4.4^6)",1.0), test_t("equal($f89(1.1,2.2,3.3,4.4),1.1*2.2^7+3.3*4.4^7)",1.0), test_t("equal($f90(1.1,2.2,3.3,4.4),1.1*2.2^8+3.3*4.4^8)",1.0), test_t("equal($f91(1.1,2.2,3.3,4.4),1.1*2.2^9+3.3*4.4^9)",1.0), test_t("equal($f92(1.1,2.2,3.3,4.4),if(1.1 and 2.2,3.3,4.4))",1.0), test_t("equal($f93(1.1,2.2,3.3,4.4),if(1.1 or 2.2,3.3,4.4))",1.0), test_t("equal($f94(1.1,2.2,3.3,4.4),if(1.1 < 2.2,3.3,4.4))",1.0), test_t("equal($f95(1.1,2.2,3.3,4.4),if(1.1 <= 2.2,3.3,4.4))",1.0), test_t("equal($f96(1.1,2.2,3.3,4.4),if(1.1 > 2.2,3.3,4.4))",1.0), test_t("equal($f97(1.1,2.2,3.3,4.4),if(1.1 >= 2.2,3.3,4.4))",1.0), test_t("equal($f98(1.1,2.2,3.3,4.4),if(equal(1.1,2.2),3.3,4.4))",1.0), test_t("equal($f99(1.1,2.2,3.3,4.4),1.1*sin(2.2)+3.3*cos(4.4))",1.0), test_t("equal((48.0/2.0*(9.0+3.0)),288.0)",1.0), test_t("equal((48.0/2.0(9.0+3.0)),288.0)",1.0), test_t("equal((6.0/2.0(1.0+2.0)),9.0)",1.0), test_t("1+2+3+4+5+6+7+8+9+0",45.0), test_t("1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 0",45.0), test_t("1.0 + 2.0 + 3.0 + 4.0 + 5.0 + 6.0 + 7.0 + 8.0 + 9.0 + 0.0",45.0), test_t("(1+2)+(3+4)+(5+6)+(7+8)+(9+0)",45.0), test_t("(1-2)+(3-4)+(5-6)+(7-8)+(9-0)",+5.0), test_t("(1+2)-(3+4)-(5+6)-(7+8)-(9+0)",-39.0), test_t("(1.0+2.0)+(3.0+4.0)+(5.0+6.0)+(7.0+8.0)+(9.0+0.0)",45.0), test_t("(1.0-2.0)+(3.0-4.0)+(5.0-6.0)+(7.0-8.0)+(9.0-0.0)",+5.0), test_t("(1.0+2.0)-(3.0+4.0)-(5.0+6.0)-(7.0+8.0)-(9.0+0.0)",-39.0), test_t("[(1.0+2.0)+[3.0+4.0]+(5.0+6.0)]+([7.0+8.0]+(9.0+0.0))",45.0), test_t("([1.0-2.0]+(3.0-4.0)+[5.0-6.0])+[(7.0-8.0)+[9.0-0.0]]",+5.0), test_t("((1.0+2.0))-[(3.0+4.0)]-((5.0+6.0))-[(7.0+8.0)]-((9.0+0.0))",-39.0), test_t("{[(1.0+2.0)+[3.0+4.0]+({5.0+6.0})]}+({[7.0+8.0]+(9.0+0.0)})",45.0), test_t("{([1.0-2.0]+(3.0-4.0)+[5.0-6.0])}+[({+7.0}-{+8.0})+[{+9.0-0.0}]]",+5.0), test_t("((+1.0+2.0))-[({+3.0+4.0})]-(({+5.0+6.0}))-[({+7.0}+8.0)]-(({+9.0}+{0.0}))",-39.0), test_t("1+2-3*4/5+6-7*8/9+0",0.37777777777777777778), test_t("1.1+2.2-3.3*4.4/5.5+6.6-7.7*8.8/9.9+0.0",0.41555555555555555556), test_t("(1+2)-(3*4)/(5+6)-(7*8)/(9+0)",-4.31313131313131313131), test_t("1/1+1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9",2.82896825396825396825), test_t("(1/1)+(1/2)+(1/3)+(1/4)+(1/5)+(1/6)+(1/7)+(1/8)+(1/9)",2.82896825396825396825), test_t("1.0/1.0+1.0/2.0+1.0/3.0+1.0/4.0+1.0/5.0+1.0/6.0+1.0/7.0+1.0/8.0+1.0/9",2.82896825396825396825), test_t("(1.0/1.0)+(1.0/2.0)+(1.0/3.0)+(1.0/4.0)+(1.0/5.0)+(1.0/6.0)+(1.0/7.0)+(1.0/8.0)+(1.0/9)",2.82896825396825396825), test_t("1/1*1/2*1/3*1/4*1/5*1/6*1/7*1/8*1/9",0.00000275573192239859), test_t("(1/1)*(1/2)*(1/3)*(1/4)*(1/5)*(1/6)*(1/7)*(1/8)*(1/9)",0.00000275573192239859), test_t("1.0/1.0*1.0/2.0*1.0/3.0*1.0/4.0*1.0/5.0*1.0/6.0*1.0/7.0*1.0/8.0*1.0/9",0.00000275573192239859), test_t("(1.0/1.0)*(1.0/2.0)*(1.0/3.0)*(1.0/4.0)*(1.0/5.0)*(1.0/6.0)*(1.0/7.0)*(1.0/8.0)*(1.0/9)",0.00000275573192239859), test_t("equal(poly01(1.2345,2.2,1.1),(2.2*1.2345^1+1.1))",1.0), test_t("equal(poly02(1.2345,3.3,2.2,1.1),(3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly03(1.2345,4.4,3.3,2.2,1.1),(4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly04(1.2345,5.5,4.4,3.3,2.2,1.1),(5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly05(1.2345,6.6,5.5,4.4,3.3,2.2,1.1),(6.6*1.2345^5+5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly06(1.2345,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(7.7*1.2345^6+6.6*1.2345^5+5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly07(1.2345,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(8.8*1.2345^7+7.7*1.2345^6+6.6*1.2345^5+5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly08(1.2345,9.9,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(9.9*1.2345^8+8.8*1.2345^7+7.7*1.2345^6+6.6*1.2345^5+5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly09(1.2345,1.1,9.9,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(1.1*1.2345^9+9.9*1.2345^8+8.8*1.2345^7+7.7*1.2345^6+6.6*1.2345^5+5.5*1.2345^4+4.4*1.2345^3+3.3*1.2345^2+2.2*1.2345^1+1.1))",1.0), test_t("equal(poly10(1.37,2.2,1.1,9.9,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(2.2*1.37^10+1.1*1.37^9+9.9*1.37^8+8.8*1.37^7+7.7*1.37^6+6.6*1.37^5+5.5*1.37^4+4.4*1.37^3+3.3*1.37^2+2.2*1.37^1+1.1))",1.0), test_t("equal(poly11(1.37,3.3,2.2,1.1,9.9,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(3.3*1.37^11+2.2*1.37^10+1.1*1.37^9+9.9*1.37^8+8.8*1.37^7+7.7*1.37^6+6.6*1.37^5+5.5*1.37^4+4.4*1.37^3+3.3*1.37^2+2.2*1.37^1+1.1))",1.0), test_t("equal(poly12(1.37,4.4,3.3,2.2,1.1,9.9,8.8,7.7,6.6,5.5,4.4,3.3,2.2,1.1),(4.4*1.37^12+3.3*1.37^11+2.2*1.37^10+1.1*1.37^9+9.9*1.37^8+8.8*1.37^7+7.7*1.37^6+6.6*1.37^5+5.5*1.37^4+4.4*1.37^3+3.3*1.37^2+2.2*1.37^1+1.1))",1.0), test_t("equal(\t \n(\n \r1.1\t\t - \n\n 2.2\n\n/\r3.3\t),(1.1-2.2/3.3))",1.0), test_t("equal((pi^2^3),(pi^8))",1.0), test_t("equal((pi^(2^3)),(pi^8))",1.0), test_t("equal(pi^2^3-pi^8,0)",1.0), test_t("equal((2*pi^2^3),2*(pi^8))",1.0), test_t("equal((pi^2^3*2),2*(pi^8))",1.0), test_t("equal((pi^2^3/2),(pi^8)/2)",1.0), test_t("equal((pi^2.2^3.3),(pi^13.4894687605338489))",1.0), test_t("equal((pi^(2.2^3.3)),(pi^13.4894687605338489))",1.0), test_t("equal((2.2*pi^2.2^3.3),2.2*(pi^13.4894687605338489))",1.0), test_t("equal((pi^2.2^3.3*2),2*(pi^13.4894687605338489))",1.0), test_t("equal((pi^2.2^3.3/2.2),(pi^13.4894687605338489)/2.2)",1.0), test_t("equal((pi^-2^3),1/(pi^8))",1.0), test_t("equal((pi^(-2^3)),1/(pi^8))",1.0), test_t("equal((pi^2^-3),(pi^(1/8)))",1.0), test_t("equal((pi^(2^-3)),(pi^(1/8)))",1.0), test_t("equal((pi^-2^-3),1/(pi^(1/8)))",1.0), test_t("equal((pi^(-2^-3)),1/(pi^(1/8)))",1.0), test_t("equal((-pi^2^3),(-pi^8))",1.0), test_t("equal((-pi^(2^3)),(-pi^8))",1.0), test_t("equal(-pi^2^3--pi^8,0)",1.0), test_t("equal((2*-pi^2^3),2*(-pi^8))",1.0), test_t("equal((-pi^2^3*2),2*(-pi^8))",1.0), test_t("equal((-pi^2^3/2),(-pi^8)/2)",1.0), test_t("equal((-pi^2.2^3.3),(-pi^13.4894687605338489))",1.0), test_t("equal((-pi^(2.2^3.3)),(-pi^13.4894687605338489))",1.0), test_t("equal((2.2*-pi^2.2^3.3),2.2*(-pi^13.4894687605338489))",1.0), test_t("equal((-pi^2.2^3.3*2),2*(-pi^13.4894687605338489))",1.0), test_t("equal((-pi^2.2^3.3/2.2),(-pi^13.4894687605338489)/2.2)",1.0), test_t("equal((-pi^-2^3),1/(-pi^8))",1.0), test_t("equal((-pi^(-2^3)),1/(-pi^8))",1.0), test_t("equal((-pi^2^-3),(-pi^(1/8)))",1.0), test_t("equal((-pi^(2^-3)),(-pi^(1/8)))",1.0), test_t("equal((-pi^-2^-3),1/(-pi^(1/8)))",1.0), test_t("equal((-pi^(-2^-3)),1/(-pi^(1/8)))",1.0), test_t("equal((+pi^+2^+3),(+pi^+8))",1.0), test_t("equal((+pi^(2^3)),(+pi^+8))",1.0), test_t("equal(+pi^+2^+3-+pi^+8,0)",1.0), test_t("equal((+2*+pi^+2^+3),+2*(+pi^+8))",1.0), test_t("equal((+pi^+2^+3*+2),+2*(+pi^+8))",1.0), test_t("equal((+pi^+2^+3/+2),(+pi^+8)/+2)",1.0), test_t("equal((+pi^+2.2^+3.3),(+pi^+13.4894687605338489))",1.0), test_t("equal((+pi^(+2.2^+3.3)),(+pi^+13.4894687605338489))",1.0), test_t("equal((+2.2*+pi^+2.2^+3.3),+2.2*(+pi^+13.4894687605338489))",1.0), test_t("equal((+pi^+2.2^+3.3*+2),+2*(+pi^+13.4894687605338489))",1.0), test_t("equal((+pi^+2.2^+3.3/+2.2),(+pi^+13.4894687605338489)/+2.2)",1.0), test_t("equal((+pi^-2^3),1/(+pi^+8))",1.0), test_t("equal((+pi^(-2^3)),1/(+pi^+8))",1.0), test_t("equal((+pi^2^-3),(+pi^(+1/+8)))",1.0), test_t("equal((+pi^(2^-3)),(+pi^(+1/+8)))",1.0), test_t("equal((+pi^-2^-3),1/(+pi^(+1/+8)))",1.0), test_t("equal((+pi^(-2^-3)),1/(+pi^(+1/+8)))",1.0), test_t("equal((-pi^+2^+3),(-pi^+8))",1.0), test_t("equal((-pi^(2^3)),(-pi^+8))",1.0), test_t("equal(-pi^+2^+3--pi^+8,0)",1.0), test_t("equal((+2*-pi^+2^+3),2*(-pi^+8))",1.0), test_t("equal((-pi^+2^+3*2),2*(-pi^+8))",1.0), test_t("equal((-pi^+2^+3/+2),(-pi^+8)/+2)",1.0), test_t("equal((-pi^+2.2^+3.3),(-pi^+13.4894687605338489))",1.0), test_t("equal((-pi^(2.2^3.3)),(-pi^+13.4894687605338489))",1.0), test_t("equal((+2.2*-pi^+2.2^+3.3),2.2*(-pi^+13.4894687605338489))",1.0), test_t("equal((-pi^+2.2^+3.3*2),2*(-pi^+13.4894687605338489))",1.0), test_t("equal((-pi^+2.2^+3.3/+2.2),(-pi^+13.4894687605338489)/+2.2)",1.0), test_t("equal((-pi^-2^3),1/(-pi^+8))",1.0), test_t("equal((-pi^(-2^3)),1/(-pi^+8))",1.0), test_t("equal((-pi^2^-3),(-pi^(+1/+8)))",1.0), test_t("equal((-pi^(2^-3)),(-pi^(+1/+8)))",1.0), test_t("equal((-pi^-2^-3),1/(-pi^(+1/+8)))",1.0), test_t("equal((-pi^(-2^-3)),1/(-pi^(+1/+8)))",1.0), test_t("switch { case (1 <= 2) : 1; default: 1.12345; }",1.0), test_t("switch { case (1 > 2) : 0; case (1 <= 2) : 1; default: 1.12345; }",1.0), test_t("switch { case (1 <= 2) : switch { case (1 <= 2) : 1; default: 1.12345; }; default: 1.12345; }",1.0), test_t("switch { case [1 <= 2] : 1; default: 1.12345; }",1.0), test_t("switch { case [1 > 2] : 0; case [1 <= 2] : 1; default: 1.12345; }",1.0), test_t("switch { case [1 <= 2] : switch { case [1 <= 2] : 1; default: 1.12345; }; default: 1.12345; }",1.0), test_t("switch { case {1 <= 2} : 1; default: 1.12345; }",1.0), test_t("switch { case {1 > 2} : 0; case {1 <= 2} : 1; default: 1.12345; }",1.0), test_t("switch { case {1 <= 2} : switch { case {1 <= 2} : 1; default: 1.12345; }; default: 1.12345; }",1.0), test_t("switch { case [(1 <= 2)] : {1}; default: 1.12345; }",1.0), test_t("switch { case ([1 > 2]) : [0]; case ([1 <= 2]) : 1; default: 1.12345; }",1.0), test_t("switch { case {(1 <= 2)} : switch { case ({1 <= 2}) : 1; default: 1.12345; }; default: 1.12345; }",1.0), test_t("switch { case 1 > 1 : 1; case 2 > 2 : 2; case 3 = 3 : 3; case 4 > 4 : 4; default : 5; }",3.0), test_t("repeat 1.1 + 2.2 until (1 < 2)",3.3), test_t("repeat (1.1 + 2.2) until (1 < 2)",3.3), test_t("repeat 1.1 + 2.2; until (1 < 2)",3.3), test_t("repeat (1.1 + 2.2); until (1 < 2)",3.3), test_t("repeat 1.1234; 1 < 2; 1.1 + 2.2 until (1 < 2)",3.3), test_t("repeat 1.1234; 1 < 2; (1.1 + 2.2) until (1 < 2)",3.3), test_t("repeat 1.1234; 1 < 2; 1.1 + 2.2; until (1 < 2)",3.3), test_t("repeat 1.1234; 1 < 2; (1.1 + 2.2); until (1 < 2)",3.3), test_t("[*] { case 1 < 2 : 1 / 2; case (1 < 3) : 2 / 2; case 1 < 4 : 3 / 2; case (1 < 5) : 4 / 2; }",2.0), test_t(" 0 ? 1 : 2",2.0), test_t(" 1 ? 3 : 4",3.0), test_t("(0 ? 1 : 2) == 2",1.0), test_t("(1 ? 3 : 4) == 3",1.0), test_t("[(0)] ? [(1)] : [(2)]",2.0), test_t("([(0)] ? [(1)] : [(2)]) == 2",1.0), test_t("([(1)] ? [(3)] : [(4)]) == 3",1.0), test_t("(1 < 2 ? 3 : 4) == 3",1.0), test_t("(1 > 2 ? 3 : 4) == 4",1.0), test_t("(1 < 2 ? 3 + 5 : 4) == 8",1.0), test_t("(1 > 2 ? 3 : 4 + 5) == 9",1.0), test_t("(2 < 3 + 3 ? 7 : 9) == 7",1.0), test_t("(1 + 1 < 3 ? 7 : 9) == 7",1.0), test_t("(1 + 1 < 3 + 3 ? 7 : 9) == 7",1.0), test_t("(2 > 3 + 3 ? 7 : 9) == 9",1.0), test_t("(1 + 1 > 3 ? 7 : 9) == 9",1.0), test_t("(1 + 1 > 3 + 3 ? 7 : 9) == 9",1.0), test_t("(2 < (3 + 3) ? 7 : 9) == 7",1.0), test_t("((1 + 1) < 3 ? 7 : 9) == 7",1.0), test_t("((1 + 1) < (3 + 3) ? 7 : 9) == 7",1.0), test_t("(min(1,2) ? 1 + 3 : 1 + 4) == 4",1.0), test_t("(min(0,1) ? 1 + 3 : 1 + 4) == 5",1.0), test_t("if(1 < 2) 3; == 3",1.0), test_t("if(1 > 2) 3; == null",1.0), test_t("if(1 < 2) 3; else 4; == 3",1.0), test_t("if(1 > 2) 3; else 4; == 4",1.0), test_t("if(1 < 2) 3; else {1+2; 4;} == 3",1.0), test_t("if(1 > 2) 3; else {1+2; 4;} == 4",1.0), test_t("if(1 < 2) 3; else if (1 < 2) 4; == 3",1.0), test_t("if(1 > 2) 3; else if (1 < 2) 4; == 4",1.0), test_t("if(1 > 2) 3; else if (1 > 2) 4; == null",1.0), test_t("if(1 < 2) 3; else if (1 < 2) {1+2; 4;} == 3",1.0), test_t("if(1 > 2) 3; else if (1 < 2) {1+2; 4;} == 4",1.0), test_t("if(1 > 2) 3; else if (1 > 2) {1+2; 4;} == null",1.0), test_t("if(1 < 2) { 1+2; 3;} == 3",1.0), test_t("if(1 > 2) { 1+2; 3;} == null",1.0), test_t("if(1 < 2) { 1+2; 3;} else 4; == 3",1.0), test_t("if(1 > 2) { 1+2; 3;} else 4; == 4",1.0), test_t("if(1 < 2) { 1+2; 3;} else {1+2; 4;} == 3",1.0), test_t("if(1 > 2) { 1+2; 3;} else {1+2; 4;} == 4",1.0), test_t("if(1 < 2) { 1+2; 3;} else if (1 < 2) 4; == 3",1.0), test_t("if(1 > 2) { 1+2; 3;} else if (1 < 2) 4; == 4",1.0), test_t("if(1 > 2) { 1+2; 3;} else if (1 > 2) 4; == null",1.0), test_t("if(1 < 2) { 1+2; 3;} else if (1 < 2) {1+2; 4;} == 3",1.0), test_t("if(1 > 2) { 1+2; 3;} else if (1 < 2) {1+2; 4;} == 4",1.0), test_t("if(1 > 2) { 1+2; 3;} else if (1 > 2) {1+2; 4;} == null",1.0) }; static const std::size_t test_list_size = sizeof(test_list) / sizeof(test_t); template inline bool not_equal_impl(const T& t1, const T& t2, const T& epsilon = 0.0000000001/*std::numeric_limits::epsilon()*/) { if (t1 != t1) return true; if (t2 != t2) return true; T diff = std::abs(t1 - t2); T eps_norm = (std::max(T(1),std::max(std::abs(t1),std::abs(t2))) * epsilon); return diff > eps_norm; } template inline bool not_equal(const T& t0, const T& t1, const T& epsilon = T(0.0000000001)) { return not_equal_impl(t0,t1,epsilon); } inline bool not_equal(const float& t0, const float& t1, const float& epsilon = 0.000001f) { return not_equal_impl(t0,t1,epsilon); } template inline bool test_expression(const std::string& expression_string, const T& expected_result) { exprtk::symbol_table symbol_table; symbol_table.add_constants(); exprtk::polynomial poly01; exprtk::polynomial poly02; exprtk::polynomial poly03; exprtk::polynomial poly04; exprtk::polynomial poly05; exprtk::polynomial poly06; exprtk::polynomial poly07; exprtk::polynomial poly08; exprtk::polynomial poly09; exprtk::polynomial poly10; exprtk::polynomial poly11; exprtk::polynomial poly12; symbol_table.add_function("poly01", poly01); symbol_table.add_function("poly02", poly02); symbol_table.add_function("poly03", poly03); symbol_table.add_function("poly04", poly04); symbol_table.add_function("poly05", poly05); symbol_table.add_function("poly06", poly06); symbol_table.add_function("poly07", poly07); symbol_table.add_function("poly08", poly08); symbol_table.add_function("poly09", poly09); symbol_table.add_function("poly10", poly10); symbol_table.add_function("poly11", poly11); symbol_table.add_function("poly12", poly12); exprtk::expression expression; expression.register_symbol_table(symbol_table); { exprtk::parser parser; if (!parser.compile(expression_string,expression)) { printf("test_expression() - Error: %s Expression: %s\n", parser.error().c_str(), expression_string.c_str()); return false; } } if (!exprtk::expression_helper::is_constant(expression)) { printf("test_expression() - Error: Expression did not compile to a constant! Expression: %s\n", expression_string.c_str()); return false; } T result = expression.value(); if (not_equal(result,expected_result)) { printf("test_expression() - Computation Error: Expression: [%s]\tExpected: %19.15f\tResult: %19.15f\n", expression_string.c_str(), (double)expected_result, (double)result); return false; } return true; } template inline bool run_test00() { const std::size_t rounds = 10; for (std::size_t r = 0; r < rounds; ++r) { bool result = true; for (std::size_t i = 0; i < test_list_size; ++i) { if (!test_expression(test_list[i].first,T(test_list[i].second))) { result = false; } } if (!result) return false; } return true; } template struct test_xy { test_xy(std::string e, const T& v0, const T& v1, const T& r) : expr(e), x(v0), y(v1), result(r) {} std::string expr; T x; T y; T result; }; template struct test_xyzw { test_xyzw(std::string e, const T& v0, const T& v1, const T& v2, const T& v3, const T& r) : expr(e), x(v0), y(v1), z(v2), w(v3), result(r) {} std::string expr; T x; T y; T z; T w; T result; }; template inline bool run_test01() { { static const test_xy test_list[] = { test_xy("x + y" ,T(2.2),T(3.3),T(5.5 )), test_xy("x - y" ,T(3.3),T(2.2),T(1.1 )), test_xy("x * y" ,T(3.3),T(2.2),T(7.26 )), test_xy("x / y" ,T(3.3),T(2.2),T(1.5 )), test_xy("(x + y) * (x + y)" ,T(2.2),T(3.3),T(30.25)), test_xy("(x + y) / (x + y)" ,T(2.2),T(3.3),T(1.0 )), test_xy("x + y > x and x + y > y" ,T(2.2),T(3.3),T(1.0)), test_xy("1 + (x + y)" ,T(2.2),T(3.3),T(6.5 )), test_xy("(x + y) - 1" ,T(2.2),T(3.3),T(4.5 )), test_xy("1 + (x + y) * 2" ,T(2.2),T(3.3),T(12.0 )), test_xy("2 * (x + y) - 1" ,T(2.2),T(3.3),T(10.0 )), test_xy("y + (x + 1)" ,T(2.2),T(3.3),T(6.5 )), test_xy("(x + 1) + y" ,T(2.2),T(3.3),T(6.5 )), test_xy("2 * x" ,T(2.2),T(0.0),T(4.4)), test_xy("x * 2" ,T(2.2),T(0.0),T(4.4)), test_xy("1.1 + x",T(2.2),T(0.0),T(3.3)), test_xy("x + 1.1",T(2.2),T(0.0),T(3.3)), test_xy("x * 1 == x" ,T(2.0),T(3.0),T(1.0)), test_xy("1 * x == x" ,T(2.0),T(3.0),T(1.0)), test_xy("y * 1 == y" ,T(2.0),T(3.0),T(1.0)), test_xy("1 * y == y" ,T(2.0),T(3.0),T(1.0)), test_xy("x * 0 == 0" ,T(2.0),T(3.0),T(1.0)), test_xy("0 * x == 0" ,T(2.0),T(3.0),T(1.0)), test_xy("y * 0 == 0" ,T(2.0),T(3.0),T(1.0)), test_xy("0 * y == 0" ,T(2.0),T(3.0),T(1.0)), test_xy("x + 1 == 1 + x",T(2.0),T(3.0),T(1.0)), test_xy("y + 1 == 1 + y",T(2.0),T(3.0),T(1.0)), test_xy("x + y == y + x",T(2.0),T(3.0),T(1.0)), test_xy("x * y == y * x",T(2.0),T(3.0),T(1.0)), test_xy("x < y" ,T(2.0),T(3.0),T(1.0)), test_xy("y > x" ,T(2.0),T(3.0),T(1.0)), test_xy("x <= y" ,T(2.0),T(3.0),T(1.0)), test_xy("y >= x" ,T(2.0),T(3.0),T(1.0)), test_xy("x + y > y" ,T(2.0),T(3.0),T(1.0)), test_xy("x + y > x" ,T(2.0),T(3.0),T(1.0)), test_xy("x * y > y" ,T(2.0),T(3.0),T(1.0)), test_xy("x * y > x" ,T(2.0),T(3.0),T(1.0)), test_xy("(x + y) > y" ,T(2.0),T(3.0),T(1.0)), test_xy("(x + y) > x" ,T(2.0),T(3.0),T(1.0)), test_xy("(x * y) > y" ,T(2.0),T(3.0),T(1.0)), test_xy("(x * y) > x" ,T(2.0),T(3.0),T(1.0)), test_xy("(2x + 3y) == (2*x + 3*y)" ,T(2.0),T(3.0),T(1.0)), test_xy("2(x + y) == (2*x + 2*y)" ,T(2.0),T(3.0),T(1.0)), test_xy(" (x + y)3 == (3*x + 3*y)" ,T(2.0),T(3.0),T(1.0)), test_xy("2x + 3y == 2*x + 3*y" ,T(2.0),T(3.0),T(1.0)), test_xy("2(x + y) == 2*x + 2*y" ,T(2.0),T(3.0),T(1.0)), test_xy(" (x + y)3 == 3*x + 3*y" ,T(2.0),T(3.0),T(1.0)), test_xy("equal(x^2.2^1.1,17.15193942371376191362)" ,T(3.3),T(0.0),T(1.0)), test_xy("equal(3.3^x^1.1,17.15193942371376191362)" ,T(2.2),T(0.0),T(1.0)), test_xy("equal(3.3^2.2^x,17.15193942371376191362)" ,T(1.1),T(0.0),T(1.0)), test_xy("equal(x^2.2^y,17.15193942371376191362)" ,T(3.3),T(1.1),T(1.0)), test_xy("equal(x^y^1.1,17.15193942371376191362)" ,T(3.3),T(2.2),T(1.0)), test_xy("equal(3.3^x^y,17.15193942371376191362)" ,T(2.2),T(1.1),T(1.0)), test_xy("equal(x+y^3/7,x+(y*y*y)/7)",T(2.0),T(3.0),T(1.0)), test_xy("equal(1-x^3+y^2*7,1-(x*x*x)+(y*y)*7)",T(2.0),T(3.0),T(1.0)), test_xy("equal( x^0,1)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^1,x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^2,x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^3,x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^4,x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^5,x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^6,x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^7,x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^8,x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^9,x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^10,x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^11,x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^12,x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^13,x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^14,x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^15,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^16,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^17,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^18,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^19,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^20,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^21,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^22,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^23,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^24,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^25,x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x)",T(12.34),T(0.0),T(1.0)), test_xy("equal( y^0,1)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^1,y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^2,y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^3,y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^4,y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^5,y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^6,y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^7,y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^8,y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^9,y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^10,y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^11,y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^12,y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^13,y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^14,y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^15,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^16,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^17,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^18,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^19,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^20,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^21,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^22,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^23,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^24,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^25,y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y)",T(0.0),T(12.34),T(1.0)), test_xy("equal( x^-0,1/1)",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-1,1/(x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-2,1/(x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-3,1/(x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-4,1/(x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-5,1/(x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-6,1/(x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-7,1/(x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-8,1/(x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( x^-9,1/(x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-10,1/(x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-11,1/(x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-12,1/(x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-13,1/(x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-14,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-15,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-16,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-17,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-18,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-19,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-20,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-21,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-22,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-23,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-24,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal(x^-25,1/(x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x))",T(12.34),T(0.0),T(1.0)), test_xy("equal( y^-0,1/1)",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-1,1/(y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-2,1/(y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-3,1/(y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-4,1/(y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-5,1/(y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-6,1/(y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-7,1/(y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-8,1/(y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal( y^-9,1/(y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-10,1/(y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-11,1/(y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-12,1/(y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-13,1/(y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-14,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-15,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-16,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-17,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-18,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-19,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-20,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-21,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-22,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-23,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-24,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("equal(y^-25,1/(y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y*y))",T(0.0),T(12.34),T(1.0)), test_xy("(2 + x) + 7",T(3.0),T(0.0),T((2.0 + 3.0) + 7.0)), test_xy("(2 + x) - 7",T(3.0),T(0.0),T((2.0 + 3.0) - 7.0)), test_xy("(2 - x) + 7",T(3.0),T(0.0),T((2.0 - 3.0) + 7.0)), test_xy("(2 - x) - 7",T(3.0),T(0.0),T((2.0 - 3.0) - 7.0)), test_xy("(2 * x) * 7",T(3.0),T(0.0),T((2.0 * 3.0) * 7.0)), test_xy("(2 * x) / 7",T(3.0),T(0.0),T((2.0 * 3.0) / 7.0)), test_xy("(2 / x) * 7",T(3.0),T(0.0),T((2.0 / 3.0) * 7.0)), test_xy("(2 / x) / 7",T(3.0),T(0.0),T((2.0 / 3.0) / 7.0)), test_xy("2 + (x + 7)",T(3.0),T(0.0),T(2.0 + (3.0 + 7.0))), test_xy("2 + (x - 7)",T(3.0),T(0.0),T(2.0 + (3.0 - 7.0))), test_xy("2 - (x + 7)",T(3.0),T(0.0),T(2.0 - (3.0 + 7.0))), test_xy("2 - (x - 7)",T(3.0),T(0.0),T(2.0 - (3.0 - 7.0))), test_xy("2 * (x * 7)",T(3.0),T(0.0),T(2.0 * (3.0 * 7.0))), test_xy("2 * (x / 7)",T(3.0),T(0.0),T(2.0 * (3.0 / 7.0))), test_xy("2 / (x * 7)",T(3.0),T(0.0),T(2.0 / (3.0 * 7.0))), test_xy("2 / (x / 7)",T(3.0),T(0.0),T(2.0 / (3.0 / 7.0))), test_xy("2 + (7 + x)",T(3.0),T(0.0),T(2.0 + (7.0 + 3.0))), test_xy("2 + (7 - x)",T(3.0),T(0.0),T(2.0 + (7.0 - 3.0))), test_xy("2 - (7 + x)",T(3.0),T(0.0),T(2.0 - (7.0 + 3.0))), test_xy("2 - (7 - x)",T(3.0),T(0.0),T(2.0 - (7.0 - 3.0))), test_xy("2 * (7 * x)",T(3.0),T(0.0),T(2.0 * (7.0 * 3.0))), test_xy("2 * (7 / x)",T(3.0),T(0.0),T(2.0 * (7.0 / 3.0))), test_xy("2 / (7 * x)",T(3.0),T(0.0),T(2.0 / (7.0 * 3.0))), test_xy("2 / (7 / x)",T(3.0),T(0.0),T(2.0 / (7.0 / 3.0))), test_xy("(x + 2) + 7",T(3.0),T(0.0),T((3.0 + 2.0) + 7.0)), test_xy("(x + 2) - 7",T(3.0),T(0.0),T((3.0 + 2.0) - 7.0)), test_xy("(x - 2) + 7",T(3.0),T(0.0),T((3.0 - 2.0) + 7.0)), test_xy("(x - 2) - 7",T(3.0),T(0.0),T((3.0 - 2.0) - 7.0)), test_xy("(x * 2) * 7",T(3.0),T(0.0),T((3.0 * 2.0) * 7.0)), test_xy("(x * 2) / 7",T(3.0),T(0.0),T((3.0 * 2.0) / 7.0)), test_xy("(x / 2) * 7",T(3.0),T(0.0),T((3.0 / 2.0) * 7.0)), test_xy("(x / 2) / 7",T(3.0),T(0.0),T((3.0 / 2.0) / 7.0)), test_xy("((2 + x) + (3 + y))",T(7.0),T(9.0),T(((2.0 + 7.0) + (3.0 + 9.0)))), test_xy("((2 + x) - (3 + y))",T(7.0),T(9.0),T(((2.0 + 7.0) - (3.0 + 9.0)))), test_xy("((2 - x) - (3 - y))",T(7.0),T(9.0),T(((2.0 - 7.0) - (3.0 - 9.0)))), test_xy("((2 * x) * (3 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) * (3.0 * 9.0)))), test_xy("((x + 2) + (y + 3))",T(7.0),T(9.0),T(((7.0 + 2.0) + (9.0 + 3.0)))), test_xy("((x + 2) - (y + 3))",T(7.0),T(9.0),T(((7.0 + 2.0) - (9.0 + 3.0)))), test_xy("((x - 2) - (y - 3))",T(7.0),T(9.0),T(((7.0 - 2.0) - (9.0 - 3.0)))), test_xy("((2 * x) * (3 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) * (3.0 * 9.0)))), test_xy("((2 + x) + (y + 3))",T(7.0),T(9.0),T(((2.0 + 7.0) + (9.0 + 3.0)))), test_xy("((2 + x) - (y + 3))",T(7.0),T(9.0),T(((2.0 + 7.0) - (9.0 + 3.0)))), test_xy("((2 - x) - (y - 3))",T(7.0),T(9.0),T(((2.0 - 7.0) - (9.0 - 3.0)))), test_xy("((2 * x) * (3 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) * (3.0 * 9.0)))), test_xy("((x + 2) + (3 + y))",T(7.0),T(9.0),T(((7.0 + 2.0) + (3.0 + 9.0)))), test_xy("((x + 2) - (3 + y))",T(7.0),T(9.0),T(((7.0 + 2.0) - (3.0 + 9.0)))), test_xy("((x - 2) - (3 - y))",T(7.0),T(9.0),T(((7.0 - 2.0) - (3.0 - 9.0)))), test_xy("((2 * x) * (3 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) * (3.0 * 9.0)))), test_xy("((2 * x) / (3 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) / (3.0 * 9.0)))), test_xy("((2 / x) * (3 / y))",T(7.0),T(9.0),T(((2.0 / 7.0) * (3.0 / 9.0)))), test_xy("((2 * x) / (3 / y))",T(7.0),T(9.0),T(((2.0 * 7.0) / (3.0 / 9.0)))), test_xy("((2 / x) / (3 * y))",T(7.0),T(9.0),T(((2.0 / 7.0) / (3.0 * 9.0)))), test_xy("((x * 2) / (y * 3))",T(7.0),T(9.0),T(((7.0 * 2.0) / (9.0 * 3.0)))), test_xy("((x / 2) * (y / 3))",T(7.0),T(9.0),T(((7.0 / 2.0) * (9.0 / 3.0)))), test_xy("((x * 2) / (y / 3))",T(7.0),T(9.0),T(((7.0 * 2.0) / (9.0 / 3.0)))), test_xy("((x / 2) / (y * 3))",T(7.0),T(9.0),T(((7.0 / 2.0) / (9.0 * 3.0)))), test_xy("((2 * x) / (y * 3))",T(7.0),T(9.0),T(((2.0 * 7.0) / (9.0 * 3.0)))), test_xy("((2 / x) * (y / 3))",T(7.0),T(9.0),T(((2.0 / 7.0) * (9.0 / 3.0)))), test_xy("((2 * x) / (y / 3))",T(7.0),T(9.0),T(((2.0 * 7.0) / (9.0 / 3.0)))), test_xy("((2 / x) / (y * 3))",T(7.0),T(9.0),T(((2.0 / 7.0) / (9.0 * 3.0)))), test_xy("((x * 2) / (3 * y))",T(7.0),T(9.0),T(((7.0 * 2.0) / (3.0 * 9.0)))), test_xy("((x / 2) * (3 / y))",T(7.0),T(9.0),T(((7.0 / 2.0) * (3.0 / 9.0)))), test_xy("((x * 2) / (3 / y))",T(7.0),T(9.0),T(((7.0 * 2.0) / (3.0 / 9.0)))), test_xy("((x / 2) / (3 * y))",T(7.0),T(9.0),T(((7.0 / 2.0) / (3.0 * 9.0)))), test_xy("([(min(x,8) + y) + 3] - 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) + 3.0) - 4.0))), test_xy("([(min(x,8) + y) + 3] + 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) + 3.0) + 4.0))), test_xy("([(min(x,8) + y) + 3] * 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) + 3.0) * 4.0))), test_xy("([(min(x,8) + y) + 3] / 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) + 3.0) / 4.0))), test_xy("([(min(x,8) + y) - 3] - 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) - 3.0) - 4.0))), test_xy("([(min(x,8) + y) - 3] + 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) - 3.0) + 4.0))), test_xy("([(min(x,8) + y) - 3] * 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) - 3.0) * 4.0))), test_xy("([(min(x,8) + y) - 3] / 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) - 3.0) / 4.0))), test_xy("([(min(x,8) + y) * 3] - 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) * 3.0) - 4.0))), test_xy("([(min(x,8) + y) * 3] + 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) * 3.0) + 4.0))), test_xy("([(min(x,8) + y) * 3] * 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) * 3.0) * 4.0))), test_xy("([(min(x,8) + y) * 3] / 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) * 3.0) / 4.0))), test_xy("([(min(x,8) + y) / 3] - 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) / 3.0) - 4.0))), test_xy("([(min(x,8) + y) / 3] + 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) / 3.0) + 4.0))), test_xy("([(min(x,8) + y) / 3] * 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) / 3.0) * 4.0))), test_xy("([(min(x,8) + y) / 3] / 4)",T(7.0),T(9.0),T((((std::min(7.0,8.0) + 9.0) / 3.0) / 4.0))), test_xy("(4 - [3 + (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 - (3.0 + (std::min(7.0,8.0) + 9.0))))), test_xy("(4 + [3 + (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 + (3.0 + (std::min(7.0,8.0) + 9.0))))), test_xy("(4 * [3 + (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 * (3.0 + (std::min(7.0,8.0) + 9.0))))), test_xy("(4 / [3 + (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 / (3.0 + (std::min(7.0,8.0) + 9.0))))), test_xy("(4 - [3 - (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 - (3.0 - (std::min(7.0,8.0) + 9.0))))), test_xy("(4 + [3 - (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 + (3.0 - (std::min(7.0,8.0) + 9.0))))), test_xy("(4 * [3 - (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 * (3.0 - (std::min(7.0,8.0) + 9.0))))), test_xy("(4 / [3 - (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 / (3.0 - (std::min(7.0,8.0) + 9.0))))), test_xy("(4 - [3 * (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 - (3.0 * (std::min(7.0,8.0) + 9.0))))), test_xy("(4 + [3 * (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 + (3.0 * (std::min(7.0,8.0) + 9.0))))), test_xy("(4 * [3 * (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 * (3.0 * (std::min(7.0,8.0) + 9.0))))), test_xy("(4 / [3 * (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 / (3.0 * (std::min(7.0,8.0) + 9.0))))), test_xy("(4 - [3 / (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 - (3.0 / (std::min(7.0,8.0) + 9.0))))), test_xy("(4 + [3 / (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 + (3.0 / (std::min(7.0,8.0) + 9.0))))), test_xy("(4 * [3 / (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 * (3.0 / (std::min(7.0,8.0) + 9.0))))), test_xy("(4 / [3 / (min(x,8) + y)])",T(7.0),T(9.0),T((4.0 / (3.0 / (std::min(7.0,8.0) + 9.0))))), test_xy("((2 * x) + (2 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) + (2.0 * 9.0)))), test_xy("((2 * x) - (2 * y))",T(7.0),T(9.0),T(((2.0 * 7.0) - (2.0 * 9.0)))), test_xy("((2 * x) + (y * 2))",T(7.0),T(9.0),T(((2.0 * 7.0) + (9.0 * 2.0)))), test_xy("((x * 2) - (y * 2))",T(7.0),T(9.0),T(((7.0 * 2.0) - (9.0 * 2.0)))), test_xy("0 * (abs (x) + acos (y) + asin (x) + atan (y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (ceil (x) + cos (y) + cosh (x) + exp (y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (floor(x) + log (y) + log10(x) + round(y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (sin (x) + sinh (y) + sqrt (x) + tan (y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (sec (x) + csc (y) + tanh (x) + cot (y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (erf (x) + erfc (y) + sgn (y) + frac (y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (log1p(x) + expm1(y) + acosh(x) + asinh(y))",T(1.0),T(1.0),T(0.0)), test_xy("0 * (deg2grad(x) + grad2deg(y) + rad2deg(x) + deg2rad(y))",T(1.0),T(1.0),T(0.0)), test_xy("switch { case (x <= y) : (y - x); default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case (x > y) : 0; case (x <= y) : (y - x); default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case (x <= y) : switch { case (x <= y) : (y - x); default: 1.12345; }; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case [x <= y] : [y - x]; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case [x > y] : 0; case [x <= y] : [y - x]; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case [x <= y] : switch { case [x <= y] : {y - x}; default: 1.12345; }; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case {x <= y} : x; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case {x > y} : 0; case {x <= y} : {y - x}; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case {x <= y} : switch { case {x <= y} : x; default: 1.12345; }; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case [(x <= y)] : {y - x}; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case ([x > y]) : [0]; case ([x <= y]) : [y - x]; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("switch { case {(x <= y)} : switch { case ({x <= y}) : x; default: 1.12345; }; default: 1.12345; }",T(1.0),T(2.0),T(1.0)), test_xy("[*]{ case x < y : x + y; case y < x : y - x; }",T(2.0),T(3.0),T(5.0)), test_xy("[*]{ case x > y : x + y; case y > x : y - x; }",T(2.0),T(3.0),T(1.0)), test_xy("[*]{ case x > y : x - y; case y < x : y + x; }",T(2.0),T(3.0),T(0.0)), test_xy("0 ? x : y" ,T(1.0),T(2.0),T( 2.0)), test_xy("1 ? x : y" ,T(1.0),T(2.0),T( 1.0)), test_xy("x ? x : y" ,T(1.0),T(2.0),T( 1.0)), test_xy("x ? x : y" ,T(0.0),T(2.0),T( 2.0)), test_xy("(x + y < 4) ? 1 : 2" ,T(1.0),T(2.0),T( 1.0)), test_xy("(x + y > 4) ? 1 : 2" ,T(1.0),T(2.0),T( 2.0)), test_xy("x < y ? x + y : x - y" ,T(1.0),T(2.0),T( 3.0)), test_xy("x > y ? x + y : x - y" ,T(1.0),T(2.0),T(-1.0)), test_xy("(x + x < y ? 7 : 9) == 7" ,T(1.0),T(3.0),T( 1.0)), test_xy("(x + x < y + y ? 7 : 9) == 7" ,T(1.0),T(3.0),T( 1.0)), test_xy("(x > y + y ? 7 : 9) == 9" ,T(1.0),T(3.0),T( 1.0)), test_xy("(x + x > y ? 7 : 9) == 9" ,T(1.0),T(3.0),T( 1.0)), test_xy("(x + x > y + 3 ? 7 : 9) == 9" ,T(1.0),T(3.0),T( 1.0)), test_xy("(x < (y + y) ? 7 : 9) == 7" ,T(1.0),T(3.0),T( 1.0)), test_xy("((x + x) < y ? 7 : 9) == 7" ,T(1.0),T(3.0),T( 1.0)), test_xy("((x + x) < (y + y) ? 7 : 9) == 7",T(1.0),T(3.0),T( 1.0)), test_xy("(x += 2 ) == 3 " ,T(1),T(3),T(1)), test_xy("(x += 2y) == 7 " ,T(1),T(3),T(1)), test_xy("(x -= 2 ) == -1 " ,T(1),T(3),T(1)), test_xy("(x -= 2y) == -5 " ,T(1),T(3),T(1)), test_xy("(x *= 2 ) == 2 " ,T(1),T(3),T(1)), test_xy("(x *= 2y) == 6 " ,T(1),T(3),T(1)), test_xy("(x /= 2 ) == (1/2)" ,T(1),T(3),T(1)), test_xy("(x /= 2y) == (1/6)" ,T(1),T(3),T(1)), test_xy("for(i := 0; (i < 10);) { i += 1; }; x;" ,T(1),T(20),T( 1)), test_xy("for(i := 0; (i < 10) and (i != y); i+=2) { x += i; }; x;" ,T(1),T(20),T(21)), test_xy("for(i := 0; (i < 10) and (i != y);) { x += i; i+=2; }; x;",T(1),T(20),T(21)), test_xy("for(i := 0; (i < y); i += 1) { if (i <= (y / 2)) x += i; else break; }; x;" ,T(0),T(10),T(15)), test_xy("for(i := 0; (i < y); i += 1) { if (i <= (y / 2)) continue; else x += i; }; x;" ,T(0),T(10),T(30)) }; static const std::size_t test_list_size = sizeof(test_list) / sizeof(test_xy); const std::size_t rounds = 60; for (std::size_t r = 0; r < rounds; ++r) { bool loop_result = true; for (std::size_t i = 0; i < test_list_size; ++i) { test_xy& test = const_cast&>(test_list[i]); T x = test.x; T y = test.y; exprtk::symbol_table symbol_table; symbol_table.add_variable("x",x); symbol_table.add_variable("y",y); exprtk::expression expression; expression.register_symbol_table(symbol_table); { exprtk::parser parser; if (!parser.compile(test.expr,expression)) { printf("run_test01() - Error: %s Expression: %s\n", parser.error().c_str(), test.expr.c_str()); loop_result = false; continue; } } T result = expression.value(); if (not_equal(result,test.result)) { printf("run_test01() - Computation Error: Expression: [%s]\tExpected: %19.15f\tResult: %19.15f\n", test.expr.c_str(), (double)test.result, (double)result); loop_result = false; } } if (!loop_result) { return false; } } } { static const test_xyzw test_list[] = { test_xyzw("((x / y) / z )",T(7.0),T(9.0),T(3.0),T(0.0),T(((7.0 / 9.0) / 3.0 ))), test_xyzw("((x / y) / 2 )",T(7.0),T(9.0),T(3.0),T(0.0),T(((7.0 / 9.0) / 2.0 ))), test_xyzw("((x / 2) / y )",T(7.0),T(9.0),T(3.0),T(0.0),T(((7.0 / 2.0) / 9.0 ))), test_xyzw("((2 / x) / y )",T(7.0),T(9.0),T(3.0),T(0.0),T(((2.0 / 7.0) / 9.0 ))), test_xyzw("( x / (y / z))",T(7.0),T(9.0),T(3.0),T(0.0),T(( 7.0 / (9.0 / 3.0)))), test_xyzw("( x / (y / 2))",T(7.0),T(9.0),T(3.0),T(0.0),T(( 7.0 / (9.0 / 2.0)))), test_xyzw("( x / (2 / y))",T(7.0),T(9.0),T(3.0),T(0.0),T(( 7.0 / (2.0 / 9.0)))), test_xyzw("( 2 / (x / y))",T(7.0),T(9.0),T(3.0),T(0.0),T(( 2.0 / (7.0 / 9.0)))), test_xyzw("([(min(x,y) + z) + 3] - 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) + 3.0) - 4.0))), test_xyzw("([(min(x,y) + z) + 3] + 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) + 3.0) + 4.0))), test_xyzw("([(min(x,y) + z) + 3] * 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) + 3.0) * 4.0))), test_xyzw("([(min(x,y) + z) + 3] / 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) + 3.0) / 4.0))), test_xyzw("([(min(x,y) + z) - 3] - 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) - 3.0) - 4.0))), test_xyzw("([(min(x,y) + z) - 3] + 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) - 3.0) + 4.0))), test_xyzw("([(min(x,y) + z) - 3] * 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) - 3.0) * 4.0))), test_xyzw("([(min(x,y) + z) - 3] / 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) - 3.0) / 4.0))), test_xyzw("([(min(x,y) + z) * 3] - 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) * 3.0) - 4.0))), test_xyzw("([(min(x,y) + z) * 3] + 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) * 3.0) + 4.0))), test_xyzw("([(min(x,y) + z) * 3] * 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) * 3.0) * 4.0))), test_xyzw("([(min(x,y) + z) * 3] / 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) * 3.0) / 4.0))), test_xyzw("([(min(x,y) + z) / 3] - 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) / 3.0) - 4.0))), test_xyzw("([(min(x,y) + z) / 3] + 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) / 3.0) + 4.0))), test_xyzw("([(min(x,y) + z) / 3] * 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) / 3.0) * 4.0))), test_xyzw("([(min(x,y) + z) / 3] / 4)",T(5.0),T(7.0),T(9.0),T(0.0),T((((std::min(5.0,7.0) + 9.0) / 3.0) / 4.0))), test_xyzw("(4 - [3 + (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 - (3.0 + (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 + [3 + (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 + (3.0 + (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 * [3 + (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 * (3.0 + (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 / [3 + (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 / (3.0 + (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 - [3 - (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 - (3.0 - (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 + [3 - (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 + (3.0 - (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 * [3 - (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 * (3.0 - (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 / [3 - (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 / (3.0 - (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 - [3 * (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 - (3.0 * (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 + [3 * (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 + (3.0 * (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 * [3 * (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 * (3.0 * (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 / [3 * (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 / (3.0 * (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 - [3 / (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 - (3.0 / (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 + [3 / (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 + (3.0 / (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 * [3 / (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 * (3.0 / (std::min(5.0,7.0) + 9.0))))), test_xyzw("(4 / [3 / (min(x,y) + z)])",T(5.0),T(7.0),T(9.0),T(0.0),T((4.0 / (3.0 / (std::min(5.0,7.0) + 9.0))))), test_xyzw("if(x < y) { z+2; z;} == z" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x > y) { z+2; z;} == null" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x < y) { z+2; z;} else w; == z" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x > y) { z+2; z;} else 1 + w; == (w + 1)" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x < y) { z+2; z;} else {1+2; w;} == z" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x > y) { z+2; z;} else {1+2; w;} == w" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw("if(x < y) { z+2; z;} else if (x < y) w; == z" ,T(1.0),T(2.0),T(3.0),T(4.0),T(1.0)), test_xyzw