use rand::random;
pub fn name() -> String {
let index = random::<usize>() % CL_SYMBOLS.len();
CL_SYMBOLS[index].to_string()
}
const CL_SYMBOLS: [&'static str; 740] = [
"abort",
"abs",
"acons",
"acos",
"acosh",
"add-method",
"adjoin",
"adjust-array",
"adjustable-array-p",
"allocate-instance",
"alpha-char-p",
"alphanumericp",
"and",
"append",
"apply",
"apropos",
"apropos-list",
"aref",
"arithmetic-error-operands",
"arithmetic-error-operation",
"array-dimension",
"array-dimensions",
"array-displacement",
"array-element-type",
"array-has-fill-pointer-p",
"array-in-bounds-p",
"array-rank",
"array-row-major-index",
"array-total-size",
"arrayp",
"ash",
"asin",
"asinh",
"assert",
"assoc",
"assoc-if",
"assoc-if-not",
"atan",
"atanh",
"atom",
"bit",
"bit-and",
"bit-andc1",
"bit-andc2",
"bit-eqv",
"bit-ior",
"bit-nand",
"bit-nor",
"bit-not",
"bit-orc1",
"bit-orc2",
"bit-vector-p",
"bit-xor",
"block",
"boole",
"both-case-p",
"boundp",
"break",
"broadcast-stream-streams",
"butlast",
"byte",
"byte-position",
"byte-size",
"caaaar",
"caaadr",
"caaar",
"caadar",
"caaddr",
"caadr",
"caar",
"cadaar",
"cadadr",
"cadar",
"caddar",
"cadddr",
"caddr",
"cadr",
"call-method",
"car",
"case",
"catch",
"ccase",
"cdaaar",
"cdaadr",
"cdaar",
"cdadar",
"cdaddr",
"cdadr",
"cdar",
"cddaar",
"cddadr",
"cddar",
"cdddar",
"cddddr",
"cdddr",
"cddr",
"cdr",
"ceiling",
"cell-error-name",
"cerror",
"change-class",
"char",
"char-code",
"char-downcase",
"char-equal",
"char-greaterp",
"char-int",
"char-lessp",
"char-name",
"char-not-equal",
"char-not-greaterp",
"char-not-lessp",
"char-upcase",
"char/=",
"char<",
"char<=",
"char=",
"char>",
"char>=",
"character",
"characterp",
"check-type",
"cis",
"class-name",
"class-of",
"clear-input",
"clear-output",
"close",
"clrhash",
"code-char",
"coerce",
"compile",
"compile-file",
"compile-file-pathname",
"compiled-function-p",
"compiler-macro-function",
"complement",
"complex",
"complexp",
"compute-applicable-methods",
"compute-restarts",
"concatenate",
"concatenated-stream-streams",
"cond",
"conjugate",
"cons",
"consp",
"constantly",
"constantp",
"continue",
"copy-alist",
"copy-list",
"copy-pprint-dispatch",
"copy-readtable",
"copy-seq",
"copy-structure",
"copy-symbol",
"copy-tree",
"cos",
"cosh",
"count",
"count-if",
"count-if-not",
"ctypecase",
"decf",
"declaim",
"decode-float",
"decode-universal-time",
"defclass",
"defconstant",
"defgeneric",
"define-compiler-macro",
"define-condition",
"define-method-combination",
"define-modify-macro",
"define-setf-expander",
"define-symbol-macro",
"defmacro",
"defmethod",
"defpackage",
"defparameter",
"defsetf",
"defstruct",
"deftype",
"defun",
"defvar",
"delete",
"delete-duplicates",
"delete-file",
"delete-if",
"delete-if-not",
"delete-package",
"denominator",
"deposit-field",
"describe",
"describe-object",
"destructuring-bind",
"digit-char",
"digit-char-p",
"directory",
"directory-namestring",
"disassemble",
"do",
"do*",
"do-all-symbols",
"do-external-symbols",
"do-symbols",
"documentation",
"dolist",
"dotimes",
"dpb",
"dribble",
"ecase",
"echo-stream-input-stream",
"echo-stream-output-stream",
"ed",
"eighth",
"elt",
"encode-universal-time",
"endp",
"enough-namestring",
"ensure-directories-exist",
"ensure-generic-function",
"eq",
"eql",
"equal",
"equalp",
"error",
"etypecase",
"eval",
"eval-when",
"evenp",
"every",
"exp",
"export",
"expt",
"fboundp",
"fceiling",
"fdefinition",
"ffloor",
"fifth",
"file-author",
"file-error-pathname",
"file-length",
"file-namestring",
"file-position",
"file-string-length",
"file-write-date",
"fill",
"fill-pointer",
"find",
"find-all-symbols",
"find-class",
"find-if",
"find-if-not",
"find-method",
"find-package",
"find-restart",
"find-symbol",
"finish-output",
"first",
"flet",
"float",
"float-digits",
"float-precision",
"float-radix",
"float-sign",
"floatp",
"floor",
"fmakunbound",
"force-output",
"format",
"formatter",
"fourth",
"fresh-line",
"fround",
"ftruncate",
"funcall",
"function",
"function-keywords",
"function-lambda-expression",
"functionp",
"gcd",
"gensym",
"gentemp",
"get",
"get-decoded-time",
"get-dispatch-macro-character",
"get-internal-real-time",
"get-internal-run-time",
"get-macro-character",
"get-output-stream-string",
"get-properties",
"get-setf-expansion",
"get-universal-time",
"getf",
"gethash",
"go",
"graphic-char-p",
"handler-bind",
"handler-case",
"hash-table-count",
"hash-table-p",
"hash-table-rehash-size",
"hash-table-rehash-threshold",
"hash-table-size",
"hash-table-test",
"host-namestring",
"identity",
"if",
"ignore-errors",
"imagpart",
"import",
"in-package",
"incf",
"initialize-instance",
"input-stream-p",
"inspect",
"integer-decode-float",
"integer-length",
"integerp",
"interactive-stream-p",
"intern",
"intersection",
"invalid-method-error",
"invoke-debugger",
"invoke-restart",
"invoke-restart-interactively",
"isqrt",
"keywordp",
"labels",
"lambda",
"last",
"lcm",
"ldb",
"ldb-test",
"ldiff",
"length",
"let",
"let*",
"lisp-implementation-type",
"lisp-implementation-version",
"list",
"list*",
"list-all-packages",
"list-length",
"listen",
"listp",
"load",
"load-logical-pathname-translations",
"load-time-value",
"locally",
"log",
"logand",
"logandc1",
"logandc2",
"logbitp",
"logcount",
"logeqv",
"logical-pathname",
"logical-pathname-translations",
"logior",
"lognand",
"lognor",
"lognot",
"logorc1",
"logorc2",
"logtest",
"logxor",
"long-site-name",
"loop",
"loop-finish",
"lower-case-p",
"machine-instance",
"machine-type",
"machine-version",
"macro-function",
"macroexpand",
"macroexpand-1",
"macrolet",
"make-array",
"make-broadcast-stream",
"make-concatenated-stream",
"make-condition",
"make-dispatch-macro-character",
"make-echo-stream",
"make-hash-table",
"make-instance",
"make-instances-obsolete",
"make-list",
"make-load-form",
"make-load-form-saving-slots",
"make-package",
"make-pathname",
"make-random-state",
"make-sequence",
"make-string",
"make-string-input-stream",
"make-string-output-stream",
"make-symbol",
"make-synonym-stream",
"make-two-way-stream",
"makunbound",
"map",
"map-into",
"mapc",
"mapcan",
"mapcar",
"mapcon",
"maphash",
"mapl",
"maplist",
"mask-field",
"max",
"member",
"member-if",
"member-if-not",
"merge",
"merge-pathnames",
"method-combination-error",
"method-qualifiers",
"min",
"minusp",
"mismatch",
"mod",
"muffle-warning",
"multiple-value-bind",
"multiple-value-call",
"multiple-value-list",
"multiple-value-prog1",
"multiple-value-setq",
"name-char",
"namestring",
"nbutlast",
"nconc",
"nintersection",
"ninth",
"no-applicable-method",
"no-next-method",
"not",
"notany",
"notevery",
"nreconc",
"nreverse",
"nset-difference",
"nset-exclusive-or",
"nstring-capitalize",
"nstring-downcase",
"nstring-upcase",
"nsublis",
"nsubst",
"nsubst-if",
"nsubst-if-not",
"nsubstitute",
"nsubstitute-if",
"nsubstitute-if-not",
"nth",
"nth-value",
"nthcdr",
"null",
"numberp",
"numerator",
"nunion",
"oddp",
"open",
"open-stream-p",
"or",
"output-stream-p",
"package-error-package",
"package-name",
"package-nicknames",
"package-shadowing-symbols",
"package-use-list",
"package-used-by-list",
"packagep",
"pairlis",
"parse-integer",
"parse-namestring",
"pathname",
"pathname-device",
"pathname-directory",
"pathname-host",
"pathname-match-p",
"pathname-name",
"pathname-type",
"pathname-version",
"pathnamep",
"peek-char",
"phase",
"plusp",
"pop",
"position",
"position-if",
"position-if-not",
"pprint",
"pprint-dispatch",
"pprint-exit-if-list-exhausted",
"pprint-fill",
"pprint-indent",
"pprint-linear",
"pprint-logical-block",
"pprint-newline",
"pprint-pop",
"pprint-tab",
"pprint-tabular",
"prin1",
"prin1-to-string",
"princ",
"princ-to-string",
"print",
"print-not-readable-object",
"print-object",
"print-unreadable-object",
"probe-file",
"proclaim",
"prog",
"prog*",
"prog1",
"prog2",
"progn",
"progv",
"provide",
"psetf",
"psetq",
"push",
"pushnew",
"quote",
"random",
"random-state-p",
"rassoc",
"rassoc-if",
"rassoc-if-not",
"rational",
"rationalize",
"rationalp",
"read",
"read-byte",
"read-char",
"read-char-no-hang",
"read-delimited-list",
"read-from-string",
"read-line",
"read-preserving-whitespace",
"read-sequence",
"readtable-case",
"readtablep",
"realp",
"realpart",
"reduce",
"reinitialize-instance",
"rem",
"remf",
"remhash",
"remove",
"remove-duplicates",
"remove-if",
"remove-if-not",
"remove-method",
"remprop",
"rename-file",
"rename-package",
"replace",
"require",
"rest",
"restart-bind",
"restart-case",
"restart-name",
"return",
"return-from",
"revappend",
"reverse",
"room",
"rotatef",
"round",
"row-major-aref",
"rplaca",
"rplacd",
"sbit",
"scale-float",
"schar",
"search",
"second",
"set",
"set-difference",
"set-dispatch-macro-character",
"set-exclusive-or",
"set-macro-character",
"set-pprint-dispatch",
"set-syntax-from-char",
"setf",
"setq",
"seventh",
"shadow",
"shadowing-import",
"shared-initialize",
"shiftf",
"short-site-name",
"signal",
"signum",
"simple-bit-vector-p",
"simple-condition-format-arguments",
"simple-condition-format-control",
"simple-string-p",
"simple-vector-p",
"sin",
"sinh",
"sixth",
"sleep",
"slot-boundp",
"slot-exists-p",
"slot-makunbound",
"slot-missing",
"slot-unbound",
"slot-value",
"software-type",
"software-version",
"some",
"sort",
"special-operator-p",
"sqrt",
"stable-sort",
"standard-char-p",
"step",
"store-value",
"stream-element-type",
"stream-error-stream",
"stream-external-format",
"streamp",
"string",
"string-capitalize",
"string-downcase",
"string-equal",
"string-greaterp",
"string-left-trim",
"string-lessp",
"string-not-equal",
"string-not-greaterp",
"string-not-lessp",
"string-right-trim",
"string-trim",
"string-upcase",
"string/=",
"string<",
"string<=",
"string=",
"string>",
"string>=",
"stringp",
"sublis",
"subseq",
"subsetp",
"subst",
"subst-if",
"subst-if-not",
"substitute",
"substitute-if",
"substitute-if-not",
"subtypep",
"svref",
"sxhash",
"symbol-function",
"symbol-macrolet",
"symbol-name",
"symbol-package",
"symbol-plist",
"symbol-value",
"symbolp",
"synonym-stream-symbol",
"tagbody",
"tailp",
"tan",
"tanh",
"tenth",
"terpri",
"the",
"third",
"throw",
"time",
"trace",
"translate-logical-pathname",
"translate-pathname",
"tree-equal",
"truename",
"truncate",
"two-way-stream-input-stream",
"two-way-stream-output-stream",
"type-error-datum",
"type-error-expected-type",
"type-of",
"typecase",
"typep",
"unbound-slot-instance",
"unexport",
"unintern",
"union",
"unless",
"unread-char",
"untrace",
"unuse-package",
"unwind-protect",
"update-instance-for-different-class",
"update-instance-for-redefined-class",
"upgraded-array-element-type",
"upgraded-complex-part-type",
"upper-case-p",
"use-package",
"use-value",
"user-homedir-pathname",
"values",
"values-list",
"vector",
"vector-pop",
"vector-push",
"vector-push-extend",
"vectorp",
"warn",
"when",
"wild-pathname-p",
"with-accessors",
"with-compilation-unit",
"with-condition-restarts",
"with-hash-table-iterator",
"with-input-from-string",
"with-open-file",
"with-open-stream",
"with-output-to-string",
"with-package-iterator",
"with-simple-restart",
"with-slots",
"with-standard-io-syntax",
"write",
"write-byte",
"write-char",
"write-line",
"write-sequence",
"write-string",
"write-to-string",
"y-or-n-p",
"yes-or-no-p",
"zerop"];