@@ -133,9 +133,6 @@ function term_matcher_constructor(term, acSets)
133
133
data = car (data) # from (..., ) to ...
134
134
! iscall (data) && return nothing # if first element is not a call, return nothing
135
135
136
- result = loop (data, bindings, matchers)
137
- result != = nothing && return success (result, 1 )
138
-
139
136
# if data is of the alternative form (1/...)^(...), it might match with negative exponent
140
137
if (operation (data) === ^ ) && iscall (arguments (data)[1 ]) && (operation (arguments (data)[1 ]) === / ) && isequal (arguments (arguments (data)[1 ])[1 ], 1 )
141
138
one_over_smth = arguments (data)[1 ]
@@ -144,6 +141,10 @@ function term_matcher_constructor(term, acSets)
144
141
result = loop (frankestein, bindings, matchers)
145
142
result != = nothing && return success (result, 1 )
146
143
end
144
+
145
+ result = loop (data, bindings, matchers)
146
+ result != = nothing && return success (result, 1 )
147
+
147
148
# if data is of the alternative form 1/(...)^(...), it might match with negative exponent
148
149
if (operation (data) === / ) && isequal (arguments (data)[1 ], 1 ) && iscall (arguments (data)[2 ]) && (operation (arguments (data)[2 ]) === ^ )
149
150
denominator = arguments (data)[2 ]
0 commit comments