+ (format nil "~{~A~%~}"
+ (mapcar
+ (lambda (turtle)
+ (format nil
+ "\"~A\",\"~A\",\"~A\",\"0\",\"0\",\"\"\"default\"\"\",\"\"\"\"\"\",\"9.9\",\"{all-turtles}\",\"false\",\"1\",\"1\",\"\"\"up\"\"\""
+ (turtle-who turtle)
+ (format-num (turtle-color turtle))
+ (format-num (turtle-heading turtle))))
+ (reverse *turtles*)))