Integate[] warning shows only first time, but not the second time?

*To*: mathgroup at smc.vnet.net*Subject*: [mg69501] Integate[] warning shows only first time, but not the second time?*From*: "Nasser Abbasi" <nma at 12000.org>*Date*: Thu, 14 Sep 2006 06:56:03 -0400 (EDT)*Reply-to*: "Nasser Abbasi" <nma at 12000.org>

hi; 5.2 on XP. Integrate function show a warning first time it is called in this example, but not the second time? (I've also put a screen shot and the notebook itself here http://12000.org/tmp/091406/strange_091306.htm Remove["Global`*"]; Off[General::spell]; nNodes = 3; nElements = nNodes - 1; length = 1; xc = Table[i*(length/nElements), {i, 0, nNodes - 1}]; N1[i_Integer, x_] := Module[{}, If[i == 1, If[x > xc[[i + 1]], 0, (xc[[i + 1]] - x)/(xc[[i + 1]] - xc[[i]])], If[i == nNodes, 0, If[x < xc[[i - 1]] || x > xc[[i + 1]], 0, (xc[[i + 1]] - x)/ (xc[[i + 1]] - xc[[i]])]]]] Integrate[N1[2, x], {x, 0, 1}] Integrate::"fas":"Warning: One or more assumptions evaluated to lse. ----> warning 1 Integrate[N1[2, x], {x, 0, 1}] ------> Where is the warning gone? 1 I wish Mathematica would give MORE DETAILED error messages. It would really help and speed things more. Like in this, it could tell the user Which warning is it? which line number, and such things. I hope these things are improved in the next release of Mathematica. Nasser