Having a new problem with v10 that I never had in v9:
When I run an evaluation that is computationally intensive, the evaluation will fail and all defined variables and functions will clear. Here's an example:
I define my variables and functions:
scale = 0.09;
c = GoldenRatio;
vee = 2;
d = 1;
n = 25;
groovewidth = 0.014;
groovedepth = 0.014;
plotpts = 175;
maxrecurs = 0;
minshellthickness = 0.02;
CurveA[i_] :=
ParametricPlot3D[{scale c Cosh[s/c] Cos[s + (i - 1) (2 Pi)/n] + (
Sqrt[2] d Cos[s + (i - 1) (2 Pi)/n] Cosh[s/c])/Sqrt[
Cosh[s/c]^2 (-1 + 2 d^2 + Cosh[(2 s)/c])] t,
scale c Cosh[s/c] Sin[s + (i - 1) (2 Pi)/n] + (
Sqrt[2] d Cosh[s/c] Sin[s + (i - 1) (2 Pi)/n])/Sqrt[
Cosh[s/c]^2 (-1 + 2 d^2 + Cosh[(2 s)/c])] t,
scale d s -
Sinh[(2 s)/c]/(
Sqrt[2] Sqrt[Cosh[s/c]^2 (-1 + 2 d^2 + Cosh[(2 s)/c])])
t}, {s, -vee Pi - 0.03, vee Pi + 0.03}, {t, -0.06, 0},
PlotStyle -> Thickness[groovewidth], Mesh -> None,
MaxRecursion -> maxrecurs, PlotPoints -> plotpts]
This next input works fine the first time:
Export["CurveAseg16.stl", CurveA[16]]
The next one I try, however, will always fail and clear everything.
Export["CurveAseg17.stl", CurveA[17]]
It will work if I go back and redefine everything, but I cannot run several evaluations, one after the other, without the variables and functions clearing spontaneously. Possible cause?
