Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Manhattan distance in common Lisp
;gnu clisp 2.49 (defun manhattan-distance (x1 y1 x2 y2) (+ (abs (- x2 x1)) (abs (- y2 y1)))) (print (manhattan-distance 0 4 2 5))
run
|
edit
|
history
|
help
0
task1
lab1
Ackermann function
Recursao
lab1_var2
Laboratory#1
Sum of real numbers
Functions for Euler #152
Homework.Lisp
1lab_l