datasheet and footprint for QuantiMotor switcher inductor

[hw/altusmetrum] / gafrc

; empty the library path and populate it with only our own symbols

(reset-component-library)

(letrec ((parent "../altusmetrum/symbols")
         (dport (opendir parent))
         (do-dirs (lambda (parent dport)
                    (let ((fname (readdir dport)))
                      (if (not (eof-object? fname))
                          (begin
                           (if (not (string-prefix? "." fname))
                               (letrec ((subdir (string-append parent "/" fname)))
                                       (component-library subdir)
                                       )
                             )
                           (do-dirs parent dport)
                           )
                        )
                      )
                    )
                  )
         )
        (do-dirs parent dport)
        (closedir dport)
        )