I want to calculate something like o[n, o[n, o[n, n]]]

Where n means a number and o means a operation.

During the calculation process there are some very large numbers and they are meaningless for me.

Just stop calculating and return Indeterminate.

In fact Mathematica will Automatic abort and throw error Throw::sysexc, that means out of memory and the results all disappear.

In []:= pattern=o[2,o[2,o[8,13]]];         tps=Tuples[{Plus,Subtract,Times,Divide,Power,Log,#1^(1/#2)&},3];         ReplacePart[pattern,Thread[Position[pattern,o]->#]]&/@tps Out[]:= SystemException["MemoryAllocationFailure"]` 

Is there any way to solve this by doing some settings?

I don’t want to reconstructe my functions.

upBound=10^10;lowBound=1/upBound; With/Block[{...},     .............     myFun/@myList ]