List Of Integer LISP

List Of Integer

Definisi :
Integer adalah himpunan angka yang tak terhingga
Definisi rekursif list integer
Basis: List kosong adalah list bilangan integer
Rekurens : list bilangan integer dibuat dengan cara menambahkan sebuah integer pada
list bilangan integer.

Definisi dan Spesifikasi Type :
type List of integer
(Definisi: list yang elemennya integer, menambahkan sebuah integer pada list bilangan integer )
Definisi dan Spesifikasi Konstruktor:
Konso : integer, List of integer tidak kosong → List of integer
{Konso(e,L): menghasilkan sebuah list dari e dan L, dengan e sebagai elemen
pertama e : e o L → L’}
Kons• : List of integer tidak kosong, integer → List of integer
{ Kons(L,e): menghasilkan sebuah list dari L dan e, dengan e sebagai elemen terakhir
list : L • e → L’}

Definisi dan Spesifikasi Selektor:
FirstElmt: List of integer tidak kosong → integer
{FirstElmt(L) Menghasilkan elemen pertama list L }
Tail : List of integer tidak kosong → List of integer
{Tail(L) : Menghasilkan list tanpa elemen pertama list L }
LastElmt : List of integer tidak kosong → integer
{LastElmt(L) : Menghasilkan elemen terakhir list L }
Head : List of integer tidak kosong → List of integer
{Head(L) : Menghasilkan list tanpa elemen terakhir list L}

Realisasi dalam Lisp

(defun konso(e L) ;menghasilkan sebuah list dari e dan L, dengan e sebagai elemen pertama
(cons e L)
)
(defun kons(L e) ;menghasilkan sebuah list dari L dan e, dengan e sebagai elemen terakhir
(reverse (cons e (reverse L)))
)
(defun firstelmt(L) ;Menghasilkan karakter pertama Teks L
(car L)
)
(defun tail(L) ;Menghasilkan list tanpa elemen pertama Teks L
(cdr L)
)
(defun lastelmt(L) ;Menghasilkan karakter terakhir Teks L
(car (reverse L))
)
(defun head(L) ;Menghasilkan list tanpa elemen terakhir Teks L
(reverse (cdr (reverse L)))
)

loi
Contoh penggunaan List Of Integer
Judul :
genap (L)
Definisi dan Spesifikasi :
genap : list of integer → integer
{ genap(L) menghitung banyaknya angka genap dalam List }
Ralisasi :
Basis : jika list kosong 0
Rekurens: if (FirstElment L) genap, then + 1 genap (Tail L)
else genap (Tail L)

;mencari banyaknya angka genap dalam list of int
(defun genap ( L)
(cond((null L)0)
((evenp(car L) )(+ 1 (genap (cdr L))))
(t(genap(cdr L)))
)
)

List Of Integer.mp4_snapshot_03.01_[2015.06.23_17.00.33]

7,983 thoughts on “List Of Integer LISP