Break 1 [3]> (load "pot.l")
;; Loading file pot.l ...
;; Loaded file pot.l
T
Break 1 [3]> (triangle-perimeter 4 8 1 2 10.5 7.7)
24.293932
Break 1 [3]> (triangle-perimeter 0 0 9.5 2 -5 -5)
32.880554
Break 1 [3]>