fix testcase

git-svn-id: https://fricas.svn.sourceforge.net/svnroot/fricas/trunk@1675 b0c55286-4f34-0410-a049-a1e7e93b0762
fix comparison of arguments

git-svn-id: https://fricas.svn.sourceforge.net/svnroot/fricas/trunk@1676 b0c55286-4f34-0410-a049-a1e7e93b0762