X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Fnvm%2Fbase.lisp;h=9c49c9900bbd35d308e837fbeabc47dbb8a44193;hp=228853767bde0968e763e7bd955314db5805e4e0;hb=ef8590a;hpb=c11c429d212f7a08391cc117b9facd938cd80e63 diff --git a/src/main/nvm/base.lisp b/src/main/nvm/base.lisp index 2288537..9c49c99 100644 --- a/src/main/nvm/base.lisp +++ b/src/main/nvm/base.lisp @@ -10,7 +10,7 @@ (defvar *topology* :torus) (defvar *ticks* nil) -(defstruct turtle who color heading xcor ycor) +(defstruct turtle who color heading xcor ycor (label "") (label-color 9.9d0) (size 1d0)) (defstruct patch color xcor ycor) (defun agent-set-list (agent-set)