-
storing a
lambda expression in a
symbol using the
defun macro. (
defun foo (a b c d) (+ a b c d)) (
defun f (a) b...)
defines a new
function named f in the...
- Total) -> Total; sum([H|T], Total) -> sum(T, H+Total). LFE: (
defun sum (l) (sum l 0)) (
defun sum (('() total) total) (((cons h t) total) (sum t (+ h total))))...
- floating-point
value 42.1 ;;
Define a
function that
squares a number: (
defun square (x) (* x x)) ;;
Execute the function: (square 3) ;
Returns 9 ;; The...
-
requirements imposed upon the
parameters p, q and s (seed) are not checked. (
defun get-number-of-1-bits (bits) "Returns the
number of 1-valued bits in the...
-
Scheme In One
Defun, or
humorously Scheme In One Day (SIOD) is a
programming language, a
dialect of the
language Lisp, a small-size
implementation of...
- FAS and VLX files). A
simple ****o
world program in
AutoLISP would be: (
defun ****o ( ) (princ "\n****o World!") (princ) ) Note the
final line inside...
- twice(plusThree); writeOutput(g(7)); // 13 (
defun twice (f) (lambda (x) (funcall f (funcall f x)))) (
defun plus-three (i) (+ i 3)) (defvar g (twice #'plus-three))...
- requirements.") (declaim (type (integer 0 *) +MAXIMUM-NUMBER-OF-ITERATIONS+)) (
defun get-errors (computed-solution exact-solution) "For each
component of the...
- be
viewed and
changed using the DO****ENTATION function. For instance: (
defun foo () "hi there" nil) (do****entation #'foo 'function) => "hi there" The...
- in
either an
existing Emacs Lisp
source file or an
empty Emacs buffer: (
defun my-split-window-func () (interactive) (split-window-below) (set-window-buffer...
