[pipes,'/cs/www/classes/cs372/spring15/a9/pipestest'].
case3.
run.
echo.
cut(x,50,a).
cut(a,25,b).
cut(b,15,c).
cut(c,7,d).
cut(d,5,e).
pipes.
weld(e,d).
weld(e,c).
weld(e,b).
weld(e,a).
pipes.
cut(e,30,a).
weld(a,e).
pipes.
trim(x,5).
trim(x,5).
trim(x,5).
trim(x,5).
trim(x,5).
trim(x,5).
pipes.
q.