Group Abstract

Message Boards

2.6K Views

7 Replies

0 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Mathematics Discrete Mathematics Wolfram Language Tuning and Debugging

Posted 2 years ago

Attachments: source.txt

POSTED BY: Peter Burbery

7 Replies

Sort By:

Posted 2 years ago

POSTED BY: Gianluca Gorni

Posted 2 years ago

I want the code to be as robust as possible. There's a lot of helpful functions for this like GraphQ, IntegerQ, RealValuedNumericQ and RealValuedNumberQ coming in 13.3, PolynomialQ, etc.

POSTED BY: Peter Burbery

Posted 2 years ago

Your pattern test accepts `List[Red]`: In[36]:= MatchQ[List[Red], l_?(Function[{x}, ListQ[x], {}])] Out[36]= True

POSTED BY: Gianluca Gorni

Posted 2 years ago

Yes I know, I can't really think of an example where List isn't accepted. The point stands, though.

POSTED BY: Peter Burbery

Posted 2 years ago

I am trying to understand your function `ReplacePlusMinus`. First question: what is the purpose of the complicated pattern test `l_?(Function[{x}, ListQ[x], {}])`? Why not this simpler form: myReplacePlusMinus[l_List] := SequenceReplace[l, {x_, -x_} :> PlusMinus[x]] Have you tried `ReplacePlusMinus` in these examples? ReplacePlusMinus[{1, -1}] ReplacePlusMinus[{-a, a}] Are you ok with the output?