Advanced Search

Question: Multiple plots in one "image"

Question:Multiple plots in one "image"

Kongen 0 Maple 13
plot
December 10 2010
0

> restart;

> with(plots);

BridgeHeight := 40;

BridgeFromCenter := 20;

BridgeToEdge := 35;

BridgeWidth := BridgeToEdge+BridgeFromCenter;

BridgeFromTheWater := 15;

BridgeLines := 10;

SpaceBetweenLines := 2*BridgeToEdge/BridgeLines;

 

LineStart := BridgeWidth;

CountLines := 0;

LineWidth := BridgeWidth;

while BridgeLines > CountLines do

CountLines := CountLines+1;

LineWidth := LineWidth-SpaceBetweenLines;

PLOT(CURVES([[LineWidth, BridgeFromTheWater], [BridgeFromCenter, BridgeHeight]], THICKNESS(3)))

end do;

------------------------------------------------------------
How can I plot all the plot(curves(...)) in the while function, in one single image?
Please Wait...