Commit 96bb61fe authored by Dave Cooper's avatar Dave Cooper

started adding YADD reference docs to tutorial, partial fix for text positioning in SVG/Raphael

parent 3d541104
This diff is collapsed.
\relax
\ifx\hyper@anchor\@undefined
\global \let \oldcontentsline\contentsline
\gdef \contentsline#1#2#3#4{\oldcontentsline{#1}{#2}{#3}}
\global \let \oldnewlabel\newlabel
\gdef \newlabel#1#2{\newlabelxx{#1}#2}
\gdef \newlabelxx#1#2#3#4#5#6{\oldnewlabel{#1}{{#2}{#3}}}
\AtEndDocument{\let \contentsline\oldcontentsline
\let \newlabel\oldnewlabel}
\else
\global \let \hyper@last\relax
\fi
\providecommand\HyperFirstAtBeginDocument{\AtBeginDocument}
\HyperFirstAtBeginDocument{\ifx\hyper@anchor\@undefined
\global\let\oldcontentsline\contentsline
\gdef\contentsline#1#2#3#4{\oldcontentsline{#1}{#2}{#3}}
\global\let\oldnewlabel\newlabel
\gdef\newlabel#1#2{\newlabelxx{#1}#2}
\gdef\newlabelxx#1#2#3#4#5#6{\oldnewlabel{#1}{{#2}{#3}}}
\AtEndDocument{\ifx\hyper@anchor\@undefined
\let\contentsline\oldcontentsline
\let\newlabel\oldnewlabel
\fi}
\fi}
\global\let\hyper@last\relax
\gdef\HyperFirstAtBeginDocument#1{#1}
\providecommand\HyField@AuxAddToFields[1]{}
\@writefile{toc}{\contentsline {chapter}{\numberline {1}Introduction}{1}{chapter.1}}
\@writefile{lof}{\addvspace {10\p@ }}
\@writefile{lot}{\addvspace {10\p@ }}
......@@ -38,7 +41,7 @@
\@writefile{toc}{\contentsline {subsection}{\numberline {2.1.2}Unpack the Distribution}{5}{subsection.2.1.2}}
\newlabel{subsec:unpackthedistribution}{{2.1.2}{5}{Unpack the Distribution\relax }{subsection.2.1.2}{}}
\@writefile{lof}{\contentsline {figure}{\numberline {2.1}{\ignorespaces Several Gendl versions and one GPL }}{6}{figure.2.1}}
\newlabel{fig:gendl-installation}{{2.1}{6}{Several Gendl versions and one GPL \relax }{figure.2.1}{}}
\newlabel{fig:gendl-installation}{{2.1}{6}{Several Gendl versions and one GPL\relax }{figure.2.1}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {2.1.3}Make a Desktop Shortcut}{6}{subsection.2.1.3}}
\newlabel{subsec:makeadesktopshortcut}{{2.1.3}{6}{Make a Desktop Shortcut\relax }{subsection.2.1.3}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {2.1.4}Populate your Initialization File}{6}{subsection.2.1.4}}
......@@ -258,33 +261,51 @@
\@writefile{lof}{\addvspace {10\p@ }}
\@writefile{lot}{\addvspace {10\p@ }}
\newlabel{chap:gendlreference}{{11}{67}{Gendl Reference\relax }{chapter.11}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.1}COM.GENWORKS.DOM }{67}{section.11.1}}
\newlabel{sec:com.genworks.dom}{{11.1}{67}{COM.GENWORKS.DOM \relax }{section.11.1}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.2}COM.GENWORKS.DOM-HTML }{67}{section.11.2}}
\newlabel{sec:com.genworks.dom-html}{{11.2}{67}{COM.GENWORKS.DOM-HTML \relax }{section.11.2}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.3}COM.GENWORKS.DOM-LATEX }{67}{section.11.3}}
\newlabel{sec:com.genworks.dom-latex}{{11.3}{67}{COM.GENWORKS.DOM-LATEX \relax }{section.11.3}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.4}COM.GENWORKS.DOM-WRITERS }{67}{section.11.4}}
\newlabel{sec:com.genworks.dom-writers}{{11.4}{67}{COM.GENWORKS.DOM-WRITERS \relax }{section.11.4}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.5}GDL (General-purpose Declarative Language)}{67}{section.11.5}}
\newlabel{sec:gdl(general-purposedeclarativelanguage)}{{11.5}{67}{GDL (General-purpose Declarative Language)\relax }{section.11.5}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.6}GDL-USER }{67}{section.11.6}}
\newlabel{sec:gdl-user}{{11.6}{67}{GDL-USER \relax }{section.11.6}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.7}GENDL-DOC }{67}{section.11.7}}
\newlabel{sec:gendl-doc}{{11.7}{67}{GENDL-DOC \relax }{section.11.7}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.8}GEOM-BASE (GDL Base Geometry Module)}{68}{section.11.8}}
\newlabel{sec:geom-base(gdlbasegeometrymodule)}{{11.8}{68}{GEOM-BASE (GDL Base Geometry Module)\relax }{section.11.8}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.9}GWL (Generative Web Language)}{68}{section.11.9}}
\newlabel{sec:gwl(generativeweblanguage)}{{11.9}{68}{GWL (Generative Web Language)\relax }{section.11.9}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.10}JQUERY }{68}{section.11.10}}
\newlabel{sec:jquery}{{11.10}{68}{JQUERY \relax }{section.11.10}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.11}RAPHAEL }{68}{section.11.11}}
\newlabel{sec:raphael}{{11.11}{68}{RAPHAEL \relax }{section.11.11}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.12}ROBOT }{68}{section.11.12}}
\newlabel{sec:robot}{{11.12}{68}{ROBOT \relax }{section.11.12}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.13}SURF (GDL NURBS Surface and Solids Facility)}{68}{section.11.13}}
\newlabel{sec:surf(gdlnurbssurfaceandsolidsfacility)}{{11.13}{68}{SURF (GDL NURBS Surface and Solids Facility)\relax }{section.11.13}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.14}TREE }{68}{section.11.14}}
\newlabel{sec:tree}{{11.14}{68}{TREE \relax }{section.11.14}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.15}YADD (GDL/GWL Documentation Facility)}{68}{section.11.15}}
\newlabel{sec:yadd(gdl/gwldocumentationfacility)}{{11.15}{68}{YADD (GDL/GWL Documentation Facility)\relax }{section.11.15}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.1}ENT }{67}{section.11.1}}
\newlabel{sec:ent}{{11.1}{67}{ENT\relax }{section.11.1}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.2}GDL (General-purpose Declarative Language)}{67}{section.11.2}}
\newlabel{sec:gdl(general-purposedeclarativelanguage)}{{11.2}{67}{GDL (General-purpose Declarative Language)\relax }{section.11.2}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.2.1}Object Definitions}{67}{subsection.11.2.1}}
\newlabel{subsec:objectdefinitions}{{11.2.1}{67}{Object Definitions\relax }{subsection.11.2.1}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.2.2}Function and Macro Definitions}{67}{subsection.11.2.2}}
\newlabel{subsec:functionandmacrodefinitions}{{11.2.2}{67}{Function and Macro Definitions\relax }{subsection.11.2.2}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.2.3}Variables and Constants}{70}{subsection.11.2.3}}
\newlabel{subsec:variablesandconstants}{{11.2.3}{70}{Variables and Constants\relax }{subsection.11.2.3}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.3}GDL-BUILD }{71}{section.11.3}}
\newlabel{sec:gdl-build}{{11.3}{71}{GDL-BUILD\relax }{section.11.3}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.3.1}Object Definitions}{71}{subsection.11.3.1}}
\newlabel{subsec:objectdefinitions}{{11.3.1}{71}{Object Definitions\relax }{subsection.11.3.1}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.4}GDL-USER }{71}{section.11.4}}
\newlabel{sec:gdl-user}{{11.4}{71}{GDL-USER\relax }{section.11.4}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.5}GENDL-DOC }{71}{section.11.5}}
\newlabel{sec:gendl-doc}{{11.5}{71}{GENDL-DOC\relax }{section.11.5}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.6}GEOM-BASE (GDL Base Geometry Module)}{71}{section.11.6}}
\newlabel{sec:geom-base(gdlbasegeometrymodule)}{{11.6}{71}{GEOM-BASE (GDL Base Geometry Module)\relax }{section.11.6}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.6.1}Object Definitions}{71}{subsection.11.6.1}}
\newlabel{subsec:objectdefinitions}{{11.6.1}{71}{Object Definitions\relax }{subsection.11.6.1}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.6.2}Function and Macro Definitions}{73}{subsection.11.6.2}}
\newlabel{subsec:functionandmacrodefinitions}{{11.6.2}{73}{Function and Macro Definitions\relax }{subsection.11.6.2}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.6.3}Variables and Constants}{75}{subsection.11.6.3}}
\newlabel{subsec:variablesandconstants}{{11.6.3}{75}{Variables and Constants\relax }{subsection.11.6.3}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.7}GWL (Generative Web Language)}{75}{section.11.7}}
\newlabel{sec:gwl(generativeweblanguage)}{{11.7}{75}{GWL (Generative Web Language)\relax }{section.11.7}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.7.1}Object Definitions}{75}{subsection.11.7.1}}
\newlabel{subsec:objectdefinitions}{{11.7.1}{75}{Object Definitions\relax }{subsection.11.7.1}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.7.2}Function and Macro Definitions}{76}{subsection.11.7.2}}
\newlabel{subsec:functionandmacrodefinitions}{{11.7.2}{76}{Function and Macro Definitions\relax }{subsection.11.7.2}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.7.3}Variables and Constants}{77}{subsection.11.7.3}}
\newlabel{subsec:variablesandconstants}{{11.7.3}{77}{Variables and Constants\relax }{subsection.11.7.3}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.8}RAPHAEL }{77}{section.11.8}}
\newlabel{sec:raphael}{{11.8}{77}{RAPHAEL\relax }{section.11.8}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.9}ROBOT }{77}{section.11.9}}
\newlabel{sec:robot}{{11.9}{77}{ROBOT\relax }{section.11.9}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.10}SURF (GDL NURBS Surface and Solids Facility)}{77}{section.11.10}}
\newlabel{sec:surf(gdlnurbssurfaceandsolidsfacility)}{{11.10}{77}{SURF (GDL NURBS Surface and Solids Facility)\relax }{section.11.10}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.11}TREE }{77}{section.11.11}}
\newlabel{sec:tree}{{11.11}{77}{TREE\relax }{section.11.11}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.11.1}Object Definitions}{77}{subsection.11.11.1}}
\newlabel{subsec:objectdefinitions}{{11.11.1}{77}{Object Definitions\relax }{subsection.11.11.1}{}}
\@writefile{toc}{\contentsline {section}{\numberline {11.12}YADD (GDL/GWL Documentation Facility)}{78}{section.11.12}}
\newlabel{sec:yadd(gdl/gwldocumentationfacility)}{{11.12}{78}{YADD (GDL/GWL Documentation Facility)\relax }{section.11.12}{}}
\@writefile{toc}{\contentsline {subsection}{\numberline {11.12.1}Object Definitions}{78}{subsection.11.12.1}}
\newlabel{subsec:objectdefinitions}{{11.12.1}{78}{Object Definitions\relax }{subsection.11.12.1}{}}
This diff is collapsed.
This is makeindex, version 2.15 [TeX Live 2012] (kpathsea + Thai support).
Scanning input file tutorial.idx....done (42 entries accepted, 0 rejected).
Sorting entries....done (232 comparisons).
Generating output file tutorial.ind....done (93 lines written, 0 warnings).
Scanning input file tutorial.idx....done (308 entries accepted, 0 rejected).
Sorting entries.....done (2628 comparisons).
Generating output file tutorial.ind....done (385 lines written, 0 warnings).
Output written in tutorial.ind.
Transcript written in tutorial.ilg.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
......@@ -76,18 +76,27 @@
\contentsline {chapter}{\numberline {9}More Common Lisp for Gendl}{61}{chapter.9}
\contentsline {chapter}{\numberline {10}Advanced Gendl}{63}{chapter.10}
\contentsline {chapter}{\numberline {11}Gendl Reference}{67}{chapter.11}
\contentsline {section}{\numberline {11.1}COM.GENWORKS.DOM }{67}{section.11.1}
\contentsline {section}{\numberline {11.2}COM.GENWORKS.DOM-HTML }{67}{section.11.2}
\contentsline {section}{\numberline {11.3}COM.GENWORKS.DOM-LATEX }{67}{section.11.3}
\contentsline {section}{\numberline {11.4}COM.GENWORKS.DOM-WRITERS }{67}{section.11.4}
\contentsline {section}{\numberline {11.5}GDL (General-purpose Declarative Language)}{67}{section.11.5}
\contentsline {section}{\numberline {11.6}GDL-USER }{67}{section.11.6}
\contentsline {section}{\numberline {11.7}GENDL-DOC }{67}{section.11.7}
\contentsline {section}{\numberline {11.8}GEOM-BASE (GDL Base Geometry Module)}{68}{section.11.8}
\contentsline {section}{\numberline {11.9}GWL (Generative Web Language)}{68}{section.11.9}
\contentsline {section}{\numberline {11.10}JQUERY }{68}{section.11.10}
\contentsline {section}{\numberline {11.11}RAPHAEL }{68}{section.11.11}
\contentsline {section}{\numberline {11.12}ROBOT }{68}{section.11.12}
\contentsline {section}{\numberline {11.13}SURF (GDL NURBS Surface and Solids Facility)}{68}{section.11.13}
\contentsline {section}{\numberline {11.14}TREE }{68}{section.11.14}
\contentsline {section}{\numberline {11.15}YADD (GDL/GWL Documentation Facility)}{68}{section.11.15}
\contentsline {section}{\numberline {11.1}ENT }{67}{section.11.1}
\contentsline {section}{\numberline {11.2}GDL (General-purpose Declarative Language)}{67}{section.11.2}
\contentsline {subsection}{\numberline {11.2.1}Object Definitions}{67}{subsection.11.2.1}
\contentsline {subsection}{\numberline {11.2.2}Function and Macro Definitions}{67}{subsection.11.2.2}
\contentsline {subsection}{\numberline {11.2.3}Variables and Constants}{70}{subsection.11.2.3}
\contentsline {section}{\numberline {11.3}GDL-BUILD }{71}{section.11.3}
\contentsline {subsection}{\numberline {11.3.1}Object Definitions}{71}{subsection.11.3.1}
\contentsline {section}{\numberline {11.4}GDL-USER }{71}{section.11.4}
\contentsline {section}{\numberline {11.5}GENDL-DOC }{71}{section.11.5}
\contentsline {section}{\numberline {11.6}GEOM-BASE (GDL Base Geometry Module)}{71}{section.11.6}
\contentsline {subsection}{\numberline {11.6.1}Object Definitions}{71}{subsection.11.6.1}
\contentsline {subsection}{\numberline {11.6.2}Function and Macro Definitions}{73}{subsection.11.6.2}
\contentsline {subsection}{\numberline {11.6.3}Variables and Constants}{75}{subsection.11.6.3}
\contentsline {section}{\numberline {11.7}GWL (Generative Web Language)}{75}{section.11.7}
\contentsline {subsection}{\numberline {11.7.1}Object Definitions}{75}{subsection.11.7.1}
\contentsline {subsection}{\numberline {11.7.2}Function and Macro Definitions}{76}{subsection.11.7.2}
\contentsline {subsection}{\numberline {11.7.3}Variables and Constants}{77}{subsection.11.7.3}
\contentsline {section}{\numberline {11.8}RAPHAEL }{77}{section.11.8}
\contentsline {section}{\numberline {11.9}ROBOT }{77}{section.11.9}
\contentsline {section}{\numberline {11.10}SURF (GDL NURBS Surface and Solids Facility)}{77}{section.11.10}
\contentsline {section}{\numberline {11.11}TREE }{77}{section.11.11}
\contentsline {subsection}{\numberline {11.11.1}Object Definitions}{77}{subsection.11.11.1}
\contentsline {section}{\numberline {11.12}YADD (GDL/GWL Documentation Facility)}{78}{section.11.12}
\contentsline {subsection}{\numberline {11.12.1}Object Definitions}{78}{subsection.11.12.1}
......@@ -56,7 +56,7 @@
(:texttt "cylinder")
".")
(:itemize "Advanced 3-dimensional primitives (which depend on optional add-on Geometry Kernel module) include "
(:item "Advanced 3-dimensional primitives (which depend on optional add-on Geometry Kernel module) include "
(:texttt "b-spline-curve")
", "
(:texttt "b-spline-surface")
......
......@@ -110,7 +110,7 @@ This list defaults to standard internal and test packages"
(dom-chapter `((:chapter :title "Gendl Reference")
,@(mapcar #'(lambda(package)
`((:section :title ,(the-object package strings-for-display-verbose))
(:p "Here we go...")))
(:p ,@(remove nil (the-object package dom-section)))))
(list-elements (the package-dokumentations))))))
......@@ -312,6 +312,35 @@ loaderImg: '/static/gwl/tasty-unpix/loader.gif',loaderText: 'Narrowing Down...'}
:functions
(("Void. Prints to *html-stream* a bulleted list for each of the three categories of docs in the package."
dom-section
nil
(mapcar #'(lambda(child)
(the-object child dom-subsections))
(the children))
#+nil
(html (:html
(:head
(the default-header-content)
(:title "The " (:princ (the strings-for-display-verbose)) " Package"))
(:body
(when *developing?* (html (:p (the (write-development-links)))))
(:p (the (:write-back-link :display-string "Documentation Home")))
(:p
(:center (:h2 (:princ (the :title)))
(when (package-nicknames (the :package-key))
(html (:i
(format *html-stream* "a.k.a. ~{~:(~a~)~^, ~}"
(package-nicknames (the :package-key)))))))
(mapc #'(lambda (child)
(the-object child (:write-documentation-links)))
(the :children)))
(:p (the (:write-back-link :display-string "Documentation Home")))
(:p (the :write-footer))))))
("Void. Prints to *html-stream* a bulleted list for each of the three categories of docs in the package."
write-html-sheet
nil
(if (the :package)
......
......@@ -121,7 +121,6 @@ If you specify :part-symbol-supplied, do not specify :instance-supplied."))
:computed-slots
(
(main-sheet-body
(with-cl-who-string ()
(str (the main-section main-div))))
......@@ -297,6 +296,9 @@ If you specify :part-symbol-supplied, do not specify :instance-supplied."))
:functions
(
(dom-body
()
`(:p "Mixins: " ,@(mapcar #'(lambda (sym) (string sym)) (the mixins-list))))
(write-documentation
......
......@@ -76,7 +76,9 @@ The javascript loaded is jquery."
(:i "User Code Packages copyright © their respective authors"))))))
:functions
((compute-url
((dom-body () "")
(compute-url
()
(the descriptive-url))
......@@ -246,7 +248,31 @@ The javascript loaded is jquery."
:pass-down (:return-object)))
:functions
((write-documentation-links
((dom-subsections
nil
(let ((documentations
(safe-sort (the :doks) #'string-lessp :key
#'(lambda (obj)
(format nil "~a" (the-object obj :symbol))))))
(when documentations
`((:subsection :title ,(the :heading))
((:list :style :itemize)
,@(mapcar #'(lambda(documentation)
(remove nil
`(:item
(:index ,(format nil "~a" (the-object documentation symbol)))
,(format nil "~a~a"
(the-object documentation symbol)
(if (the-object documentation :macro?)
" [Macro]" ""))
,(the-object documentation dom-body))))
documentations))))))
(write-documentation-links
nil
(let ((documentations
(safe-sort (the :doks) #'string-lessp :key
......
......@@ -124,10 +124,13 @@
;; FLAG -- collect all the trickle-downs and group this at the top in the one eval-when.
;;
`(eval-when (:compile-toplevel :load-toplevel :execute)
(unless (fboundp ',(glisp:intern (symbol-name slot) :gdl-trickle-downs))
(defgeneric ,(glisp:intern (symbol-name slot) :gdl-trickle-downs) (,self-arg &rest ,args-arg)))
(unless (fboundp ',(glisp:intern (symbol-name slot) :gdl-slots))
(defgeneric ,(glisp:intern (symbol-name slot) :gdl-slots) (,self-arg &rest ,args-arg))))
,@(remove
nil
`((unless (fboundp ',(glisp:intern (symbol-name slot) :gdl-trickle-downs))
(defgeneric ,(glisp:intern (symbol-name slot) :gdl-trickle-downs) (,self-arg &rest ,args-arg)))
,(unless from-objects?
`(unless (fboundp ',(glisp:intern (symbol-name slot) :gdl-slots))
(defgeneric ,(glisp:intern (symbol-name slot) :gdl-slots) (,self-arg &rest ,args-arg)))))))
`(unless (find-method (symbol-function ',(glisp:intern (symbol-name slot) :gdl-trickle-downs))
nil (list (find-class 'gdl-basis)) nil)
......
......@@ -306,23 +306,32 @@
(let* ((object self)
(display-controls (or (geom-base::find-in-hash object *display-controls*)
(the-object object display-controls))))
(with-format-slots (view)
(let* ((view-scale (if view (the-object view view-scale-total) 1))
(center (translate (the center) :front (half (the height)))))
(center (translate (the center) :front (half (half (* 0.7 (the length))))))
(setq center (if view (the-object view (view-point center)) center))
)
(print-variables (the center) view view-scale center )
(setq center (if view (the-object view (view-point center)) center))
(print-variables center)
(let ((font-size (* 0.9 (* (the character-size) view-scale)))
(rotation
(angle-between-vectors-d
geom-base::+rear-vector+ (the (face-normal-vector :rear))
geom-base::+top-vector+)))
(setq center (let ((point
(setq center (let ((point
(add-vectors (subseq center 0 2)
geom-base:*raphael-translation*)))
(make-point (get-x point)
(- (the-object view length) (get-y point)))))
(print-variables center)
(unless (zerop rotation) ;; FLAG -- rotate in raphael(pdf:rotate rotation)
)
......
(in-package :gdl-user)
(define-object general-note-sample (base-object)
:objects
((x-axis :type 'line :start (make-point 0 0 0) :end (make-point 1 0 0))
(origin-text :type 'general-note
:start (make-point 0 0 0)
:outline-shape-type :rectangle
:strings "O" :character-size 0.1)))
\ No newline at end of file
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