fab/closure-plate.lsp [src]
Functions for closure plate fab drawings
(calc-closure-plate s1 s2)
Returns the closure plate definition for the plate between stairs S1 and S2
The return value will be a list whose car is the finish string and cdr is a datalist for
the table.
(make-closure-plate-fab finish plates)
Creates a single closure plate fab drawing
VARS:
(FINISH STR)
(PLATES LIST (VL-EVERY 'DATA-LIST-P PLATES))
(make-closure-plate-fabs stairs)
Creates all the closure plate fab drawings for this group of STAIRS
VARS:
(STAIRS LIST (VL-EVERY 'DATA-LIST-P STAIRS))