From dfc22f9b8e7ffbaff3261ec93103946214fb43a0 Mon Sep 17 00:00:00 2001 From: Chris Sangwin <c.j.sangwin@gmail.com> Date: Sun, 10 Dec 2023 21:53:08 +0000 Subject: [PATCH] Update validators.mac Fix typo in test case. --- stack/maxima/contrib/validators.mac | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/stack/maxima/contrib/validators.mac b/stack/maxima/contrib/validators.mac index a0f272640..24f2a8f47 100644 --- a/stack/maxima/contrib/validators.mac +++ b/stack/maxima/contrib/validators.mac @@ -37,7 +37,7 @@ s_test_case(validate_underscore(1+a_1), "Underscore characters are not permitted validate_all_one_letter_variables(ex) := if not(is(ev(lmax(map(lambda([ex2],slength(string(ex2))),listofvars(ex))),simp)>1)) then "" else "Only single-character variable names are permitted in this input. Perhaps you forgot to use an asterisk (*) somewhere, or perhaps you used a Greek letter."; -s_test_case(validate_all_one_letter_variables(1, ""); +s_test_case(validate_all_one_letter_variables(1), ""); s_test_case(validate_all_one_letter_variables((A*x+B)/(x^2+1) + C/x), ""); s_test_case(validate_all_one_letter_variables((Ax+B)/(x^2+1) + C/x), "Only single-character variable names are permitted in this input. Perhaps you forgot to use an asterisk (*) somewhere, or perhaps you used a Greek letter."); s_test_case(validate_all_one_letter_variables((theta*x+B)/(x^2+1) + C/x), "Only single-character variable names are permitted in this input. Perhaps you forgot to use an asterisk (*) somewhere, or perhaps you used a Greek letter."); -- GitLab