#40 SVN 118: Intersect problem in model using part()s

[Ruven Gottlieb]

When attempting to use the intersect() of two arcs, sometimes I cannot select the proper intersect number in a model using part()s. This bug did not appear in a simple test model.

I will supply interested parties with the model that produces this bug. Contact me via SourceForge.

[Johan Kjellander]

This bug is corrected in svn#120 (and 1.19D)

[Ruven Gottlieb]

Still some intersect problems: Try the attached module.

It's supposed to test the intersections of two circles at everything out to one point of intersect, depending on how you set the OFFSET. It works for the first intersect, but they don't all work. Funny things happen with different OFFSETs. The dimension seems to be attaching itself to the wrong entity too.

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! BEGIN MODULE !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1

GLOBAL MODULE Intersect_Stress_Test();

INT INC;
FLOAT ANGLE;
FLOAT OFFSET;
INT STEPS;
FLOAT STEPVAL;

BEGINMODULE

arc_1pos(#1,vec(0, 0, 0), 1000, 0.0, 360.0);
lin_ang(#2,centre(#1, 0.0), 0.0, 2000);
arc_1pos(#3,endp(#2), 1000, 0.0, 360.0);
lin_free(#4,startp(#2), intersect(#1, #3, 1));
lin_free(#5,startp(#2), intersect(#1, #3, 2));
ldim(#6,endp(#5), endp(#4), intersect(#1, #2, 1) + vec(1, 0, 0), 10);
OFFSET:=0;
STEPS:=360;
STEPVAL:=360/STEPS;
ANGLE:=STEPVAL;

FOR INC := 1 TO STEPS DO
lin_ang(#8,centre(#1, 0.0), ANGLE, 2000 - OFFSET);
arc_1pos(#9,endp(refc(8, INC)), 1000, 0.0, 360.0);
lin_free(#10,startp(#2), intersect(#1, refc(9, INC), 1));
lin_free(#11,startp(#2), intersect(#1, refc(9, INC), 2));
ANGLE:=STEPVAL + ANGLE;
ENDFOR;

ENDMODULE

!!!!!!!!!!!!!!!!!! END MODULE !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!11