Sisteme Expert - Laborator 2

Laborator
8/10 (2 voturi)
Domeniu: Calculatoare
Conține 1 fișier: pdf
Pagini : 3 în total
Cuvinte : 419
Mărime: 6.79KB (arhivat)
Cost: Gratis
laborator 2

Extras din document

SISTEME EXPERT – LABORATOR 2

Aflarea maximului

(numar 1)

(numar 2)

(numar 3)

----------|-----------

(maxim 3)

---------| |-----------

- Prima varianta

CLIPS> (assert (maxim –999))

CLIPS> (defrule maxim

(numar ?x)

?f<-(maxim ?y&:(> ?x ?y))

=>

(retract ?f)

(assert (maxim ?x))

); de la defrule

CLIPS>

- A doua varianta

CLIPS> (defrule maxim

(numar ?x)

(not (numar ?y&:(> ?y ?x)))

=>

(assert (maxim ?x))

); de la defrule

CLIPS>

Intersectia a doua multimi

(mul1 3 7 10 20)

(mull2 3 10 15 17)

----------|-----------

(intersectie 3 10)

---------| |-----------

CLIPS> (defrule intersectie

(mul1 $? ?x $?)

(mul1 $? ?x $?)

?f <-(intersectie $?i)

(not (intersectie $? ?x $?))

=>

(assert (intersectie $?i ?x))

(retract ?f)

); de la defrule

CLIPS>

Reuniunea a doua multimi

(mul1 3 7 10 20)

(mull2 3 10 15 17)

----------|-----------

(reuniune 3 7 10 15 17 20)

---------| |-----------

CLIPS> (defrule concateneaza_multimi

(mul1 $?x)

(mul2 $?y)

=>

(assert (lista $?x $?y))

); de la defrule

CLIPS>

CLIPS> (defrule elimina_duplicate

?f<-(lista $?i1 ?x $?i2 ?x ?$i3)

=>

(retract ?f)

(assert (lista $?i1 ?x $?i2 $?i3))

); de la defrule

CLIPS>

Sortari

- Prima varianta

CLIPS> (defrule sort

?f1<-(lista $?i1 ?x $?i2)

(not (lista $? ?y&:(< ?y ?x) $?)

?f<-(sortat $?l)

=>

(retract ?f)

(retract ?f1)

(assert (lista $?i1 $?i2))

(assert (sortat $?l ?x))

); de la defrule

CLIPS>

- A doua varianta

CLIPS> (defrule sort

?f<-(lista $?i1 ?x ?y&:(< ?y ?x) $?i2)

=>

(retract ?f)

(assert $?i1 ?y ?x $?i2)

); de la defrule

CLIPS>

Permutari

CLIPS> (defrule permutare

(lista $?i1 ?x ?y $?i2)

=>

(assert (lista $?i1 ?y ?x $?i2))

); de la defrule

Preview document

Sisteme Expert - Laborator 2 - Pagina 1
Sisteme Expert - Laborator 2 - Pagina 2
Sisteme Expert - Laborator 2 - Pagina 3

Conținut arhivă zip

  • Sisteme Expert - Laborator 2.pdf

Alții au mai descărcat și

Sisteme expert în Contabilitate

1. Identificarea problemei Situatia unui mijloc fix este uneori dificil de evaluat de un auditor datorita multitudinii de factori care trebuie...

Microsistem Expert de Consiliere in Domeniul Investitiilor

1. Aspecte teoretice Sisteme expert bazate pe reguli Mijloacele prin care sistemele expert îsi ating obiectivele se bazeaza pe multimi de fapte...

Arhitectura Calculatoarelor - Intel vs AMD

Rezultatele din testul 3DS Max 7 SPECapc Test Testul alaturat consta in crearea modelelor 3D, modificarea si randarea scripturilor. Conform...

Sisteme Expert si Data Mining

Am creat o baza de date relationala numita facultate formata din fisierele: Studenti.dbf , care contine informatii despre studenti unei...

Baze de Date MRU

Să se organizeze o bază de date pentru resurse umane 1. Să se afişeze persoanele dintr-un anumit departament 2. să se numere angajaţii pe...

Sisteme Expert - Laborator 9

SE-Laborator9 CLIPS C Language Integrated Production System COOL CLIPS Object-Oriented Language CLIPS Rule-base programming language COOL...

Te-ar putea interesa și

Creditarea Întreprinderilor Mici și Mijlocii

Cap.I. Creditul bancar 1.1.Creditul – resursă de finanţare a activităţii unei întreprinderi Băncile comerciale constituite în România dupa 1989...

Sistem de Asistare a Deciziilor Privind Activitatea de Creditare pe Exemplul BCR SA

CAP.1. SELECTAREA CLIENTELEI BANCARE ŞI ANALIZA CERERII DE CREDITE 1.1. Scurt istoric al Grupului Banca Comercială Română Fondată la 1...

Cercetarea Urmelor Produse de Incendiu

Cap.I. SCURT ISTORIC Termenul de criminalistică este întrebuinţat pentru prima dată în literatura juridică, de către Hans Gross, în Manualul...

Sistem Expert pentru Evaluarea Riscului de Faliment al unei Întreprinderi în Vederea Obținerii unui Credit Bancar

SISTEM EXPERT PENTRU EVALUAREA RISCULUI DE FALIMENT AL UNEI ÎNTREPRINDERI ÎN VEDEREA OBTINERII UNUI CREDIT BANCAR Sistemele expert financiar...

Modelarea Numerică a Regimurilor de Funcționare ale Mașinii Asincrone

1. Introducere Maşinile electrice reprezintă componente de bază ale oricărui sistem electroenergetic. Progresul în industriile de vârf este strâns...

Sisteme Expert pentru Management

1. Sistemele expert si inteligenta artificiala Inteligenta artificiala este un domeniu care retine din ce în ce mai mult atentia economistilor,...

Diagnoza unui redresor complet comandat

Sistemele expert constituie o clasa particulara de sisteme informatice bazate pe inteligenta artificiala, avand ca scop reproducerea cu ajutorul...

Caracteristicile unui Sistem Expert

1. Introducere Inteligenţa Artificială (IA) este o ramură a ştiinţei promovată recent în universităţi şi laboratoare de cercetare. Astfel de...

Ai nevoie de altceva?