Question

1. Write a Lisp function called piece which takes a single argument x and implements the following piecewise linear function: piece(x) = x if 0 < x < 1 2. Write a Lisp function called intList which takes two integer arguments, a and b and returns the list of all integers from a to b (inclusive at both ends). For example, (intList 3 8) should return (345678)

Answer 1

1

( defun piece(x)
(if (<= x 0)
(format t "piece(x)= ~5f" -1))
( if (and (> x 0) (< x 1))
(format t "piece(x)= ~5f" x))
( if (and (>= x 1))
(format t "piece(x)= ~5f" 1))
)

( piece 1 )

OUTPUT :-

Sclisp main.lisp piece(x)-1.0

in above function it will print 1 if x is greater or equal to 1 and print x if 0<x<1 and print -1 if x<=0

it is written in lisp and it is a linear function.

2.

(defun intlist(a b)
(loop for x from a to b
do (print x)
))

(intlist 2 4)

OUTPUT :-

I.lI Result Sclisp main.lisp 4

in above function it will print integer between a to b .

if we give input intlist 2 4 it will print 2 3 4