Commit daa8e0fc authored by Dave Cooper's avatar Dave Cooper
Browse files

started adding to geom section.

parent 9b41feba
(in-package :gdl-user)
(define-object box-assembly-1 (base-object)
:computed-slots ((length 10)
(width (* (the length) +phi+))
(height (* (the width) +phi+)))
:objects ((box :type 'box)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment