Catch Mathematica warnings/errors without displaying them

Question

I have a problem involving NDSolve in Mathematica, which I run multiple times with different values of the parameters. For some of these values, the solution results in singularities and NDSolve warns with NDSolve::ndsz or other related warnings.

I would simply like to catch these warnings, suppress their display, and just keep track of the fact that a problem occurred for these particular values of the parameters. I thought of the following options (neither of which really do the trick):

I know I can determine whether a command has resulted in a warning or error by using Check. However, that will still display the warning. If I turn it off with Off the Check fails to report the warning too.
It is possible to stop NDSolve using the EventLocator method, so I could check for very large values of the function or its derivatives and stop evaluation in that case. However, in practice, this still produces warnings from time to time, presumably because the step size can sometimes be so large that the NDSolve warning triggers before my Event has taken place.

Any other suggestions?

Simon · Accepted Answer · 2011-03-15 10:05:43Z

11

If you wrap the Check with Quiet then I believe that everything should work as you want. For example, you can suppress the specific message Power::indet

In[1]:= Quiet[Check[0^0,err,Power::indet],Power::indet]
Out[1]= err

but other messages are still displayed

In[2]:= Quiet[Check[Sin[x,y],err,Power::indet],Power::indet]
During evaluation of In[2]:= Sin::argx: Sin called with 2 arguments; 1 argument is expected. >>
Out[2]= Sin[x,y]

answered Mar 15, 2011 at 10:05

Simon

14.7k4 gold badges43 silver badges106 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Kasper Peeters Over a year ago

While Check does not seem to catch NDSolve::ndsz warnings, the hint about Quiet was very helpful.

Simon Over a year ago

@Kasper: Glad I could help. Can you give an example where Check fails to catch the NDSolve warning?

Sjoerd C. de Vries · Accepted Answer · 2011-03-15 10:24:56Z

5

Using Quiet and Check together works:

Quiet[Check[Table[1/Sin[x], {x, 0, \[Pi], \[Pi]}], $Failed]]

answered Mar 15, 2011 at 10:24

Sjoerd C. de Vries

16.2k3 gold badges44 silver badges95 bronze badges

1 Comment

Sjoerd C. de Vries Over a year ago

Sorry, didn't see Simon's earlier answer coming in. Reminder to self: refresh before posting

Mr.Wizard · Accepted Answer · 2011-03-15 11:05:58Z

3

Perhaps you wish to redirect messages? This is copied almost verbatim from that page.

stream = OpenWrite["msgtemp.txt"];

$Messages = {stream};

1/0

FilePrint["msgtemp.txt"]

edited Mar 15, 2011 at 11:05

answered Mar 15, 2011 at 10:49

Mr.Wizard

24.4k5 gold badges46 silver badges131 bronze badges

Collectives™ on Stack Overflow

Catch Mathematica warnings/errors without displaying them

3 Answers 3

2 Comments

1 Comment

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

3 Answers 3

2 Comments

1 Comment

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related