Presentation is loading. Please wait.

Presentation is loading. Please wait.

1 Chapter 6: Using Data Structures. 2 Using Data Structures u Records u Lists u Association Lists u Binary Trees u Hierarchical Modelling u Tree Layout.

Similar presentations

Presentation on theme: "1 Chapter 6: Using Data Structures. 2 Using Data Structures u Records u Lists u Association Lists u Binary Trees u Hierarchical Modelling u Tree Layout."— Presentation transcript:

1 1 Chapter 6: Using Data Structures


3 3 Records u simplest type of data structure is a record u record packages together a fixed number of items of information, often of different type u e.g. date(3, feb, 1997) u e.g. complex numbers X + Yi can be stored in a record c(X, Y)

4 4 Complex Numbers Complex number X + Yi is represented as c(X,Y) Predicates for addition and multiplication c_add(c(R1,I1), c(R2,I2), c(R3,I3)) :- R3 = R1 + R2, I3 = I1 + I2. c_mult(c(R1,I1), c(R2,I2), c(R3,I3)) :- R3 = R1*R2 - I1*I2, I3 = R1*I2 + R2*I1. Note they can be used for subtraction/division

5 5 Example Adding 1+3i to 2+Yi Simplifying wrt C3 and Y gives

6 6 Records u Term equation can u build a recordC3 = c(R3, I3) u access a fieldC2 = c(R2, I2) u underscore _ is used to denote an anonymous variable, each occurrence is different. Useful for record access u D = date(_, M, _) in effect sets M to equal the month field of D

7 7 Lists u Lists store a variable number of objects usually of the same type. u empty list [](list) u list constructor.(item x list -> list) u special notation:

8 8 List Programming u Key: reason about two cases for L u the list is empty L = [] u the list is non-empty L = [F|R] u Example concatenating L1 and L2 giving L3 u L1 is empty, L3 is just L2 u L1 is [F|R], if Z is R concatenated with L2 then L3 is just [F|Z] append([], L2, L2). append([F|R], L2, [F|Z]) :- append(R,L2,Z).

9 9 Concatenation Examples append([], L2, L2). append([F|R], L2, [F|Z]) :- append(R,L2,Z). concatenating lists append([1,2],[3,4],L) has answer L = [1,2,3,4] breaking up lists append(X,Y,[1,2]) ans X=[]/\Y=[1,2],X=[1]/\Y=[2],X=[1,2 ]/\Y=[] BUT is a list equal to itself plus [1] append(L,[1],L) runs forever!

10 10 Alldifferent Example We can program alldifferent using disequations alldifferent_neq([]). alldifferent_neq([Y|Ys]) :- not_member(Y,Ys), alldifferent_neq(Ys). not_member(_, []). not_member(X, [Y|Ys]) :- X != Y, not_member(X, Ys). The goal alldifferent_neq([A,B,C]) has one solution

11 11 Arrays u Arrays can be represented as lists of lists u e.g. a 6 x 7 finite element description of a metal plate 100C at top edge 0C other edges [[0, 100, 100, 100, 100, 100, 0], [0, _, _, _, _, _, 0], [0, 0, 0, 0, 0, 0, 0]]

12 12 Arrays Example u In a heated metal plate each point has the average temperature of its orthogonal neighbours rows([_,_]). rows([R1,R2,R3|Rs]) :- cols(R1,R2,R3), rows([R2,R3|Rs]). cols([_,_], [_,_], [_,_]). cols([TL,T,TR|Ts],[L,M,R|Ms],[BL,B,BR|Bs]):- M = (T + L + R + B)/4, cols([T,TR|Ts],[M,R|Ms],[B,BR|Bs]).

13 13 Arrays Example  The goal rows( plate ) constrains plate to [[0, 100, 100, 100, 100, 100, 0], [0, 46.6, 62.5, 66.4, 62.5, 46.6, 0], [0, 24.0, 36.9, 40.8, 36.9, 24.0, 0], [0, 12.4, 20.3, 22.9, 20.3, 12.4, 0], [0, 5.3, 9.0, 10.2, 9.0, 5.3, 0], [0, 0, 0, 0, 0, 0, 0]]

14 14 Association Lists u A list of pairs is an association list u we can access the pair using only one half of the information u e.g. telephone book [p(peter, ), p(kim, ), p(nicole, )] u call this phonelist

15 15 List Membership member(X, [X|_]). member(X, [_|R]) :- member(X, R). X is a member of a list if it is the first element or it is a member of the remainder R We can use it to look up Kim’s phone number member(p(kim,N), phonelist ) Unique answer: N =

16 16 List Membership Example

17 17 Abstract Datatype: Dictionary lookup information associated with a key newdic build an empty association list add key and associated information delete key and information lookup(D,Key,Info):-member(p(Key,Info),D). newdic([]). addkey(D0,K,I,D) :- D = [p(K,I)|D0]. delkey([],_,[]). delkey([p(K,_)|D],K,D). delkey([p(K0,I)|D0],K,[p(K0,I)|D]) :- K != K0, delkey(D0,K,D).

18 18 Modelling a Graph u A directed graph can be thought of as an association of each node to its list of adjacent nodes. [p(fn,[]), p(iw,[fn]), p(ch,[fn]), p(ew,[fn]), p(rf,[ew]), p(wd,[ew]), p(tl,[ch,rf]), p(dr,[iw])] call this house

19 19 Finding Predecessors The predecessors of a node are its immediate predecessors plus each of their predecessors predecessors(N,D,P) :- lookup(D,N,NP), list_predecessors(NP,D,LP), list_append([NP|LP],P). list_predecessors([],_,[]). list_predecessors([N|Ns],D,[NP|NPs]) :- predecessors(N,D,NP), list_predecessors(Ns,D,NPs).

20 20 Finding Predecessors list_append([],[]). list_append([L|Ls],All) :- list_append(Ls,A), append(L,A,All). Appends a list of lists into one list. We can determine the predecessors of tiles (tl) using: predecessors(tl, house, Pre) The answer is Pre = [ch, rf, fn, ew, fn] Note repeated discovery of fn

21 21 Accumulation u Programs building an answer sometimes can use the list answer calculated so far to improve the computation u Rather than one argument, the answer, use two arguments, the answer so far, and the final answer. u This is an accumulator pair

22 22 Finding Predecessors u A better approach accumulate the predcsrs. predecessors(N,D,P0,P) :- lookup(D,N,NP), cumul_predecessors(NP,D,P0,P). cumul_predecessors([],_,P,P). cumul_predecessors([N|Ns],D,P0,P) :- member(N,P0), cumul_predecessors(Ns,D,P0,P). cumul_predecessors([N|Ns],D,P0,P) :- not_member(N,P0), predecessors(N,D,[N|P0],P1), cumul_predecessors(Ns,D,P1,P).

23 23 Binary Trees u empty tree: null u non-empty: node(t1, i, t2) where t1 and t2 are trees and i is the item in the node u programs follow a pattern (as for lists) u a rule for empty trees u a recursive rule (or more) for non-empty trees

24 24 Binary Trees node(node(null,p(k,282),null),p(n,282),node(null,p(p,616),null)) A binary tree storing the same info as phonelist denote it by ptree

25 25 Binary Trees traverse(null,[]). traverse(node(T1,I,T2),L) :- traverse(T1,L1), traverse(T2,L2), append(L1,[I|L2],L). Program to traverse a binary tree collecting items traverse( ptree,L) has unique answer L = [p(k,282),p(n,282),p(p,616)]

26 26 Binary Search Tree u binary search tree (BST): A binary tree with an order on the items such that for each node(t1,i,t2), each item in t1 is less than i, and each item in t2 is greater then i u previous example is a bst with right order u another implementation of a dictionary!

27 27 Binary Search Tree find(node(_,I,_),E) :- E = I. find(node(L,I,_),E):-less_than(E,I),find(L,E). find(node(_,I,R),E):-less_than(I,E),find(R,E). Finding an element in a binary search tree less_than(p(k,_),p(n,_)). less_than(p(k,_),p(p,_)). less_than(p(n,_),p(p,_)). Consider the goal find( ptree, p(k,N)) with definition of less_than given below

28 28 Binary Search Tree The binary search tree implements a dictionary with logarithmic average time to lookup and add and delete

29 29 Hierarchical Modelling u Many problems are hierarchical in nature u complex objects are made up of collections of simpler objects u modelling can reflect the hierarchy of the problem

30 30 Hierarchical Modelling Ex. u steady-state RLC electrical circuits u sinusoidal voltages and currents are modelled by complex numbers: u individual circuit elements are modelled in terms of voltages and current: u circuits are modelled by combining circuit components

31 31 Hierarchical Modelling Ex u Represent voltages and currents by complex numbers: V = c(X,Y) u Represent circuit elements by tree with component value: E = resistor(100), E = capacitor(0.1), E = inductor(2) u Represent circuits as combinations or single elements: C = parallel(E1,E2), C = series(E1,E2), C = E

32 32 Hierarchical Modelling Ex. resistor(R,V,I,_) :- c_mult(I,c(R,0),V). inductor(L,V,I,W) :- c_mult(c(0,W*L),I,V). capacitor(C,V,I,W) :- c_mult(c(0,W*C),V,I). circ(resistor(R),V,I,W):-resistor(R,V,I,W). circ(inductor(L),V,I,W):-inductor(L,V,I,W). circ(capacitor(C),V,I,W):-capacitor(C,V,I,W). circ(parallel(C1,C2),V,I,W) :-c_add(I1,I2,I), circ(C1,V,I1,W),circ(C2,V,I2,W). circ(series(C1,C2),V,I,W) :- c_add(V1,V2,V), circ(C1,V1,I,W),circ(C2,V2,I,W).

33 33 Hierarchical Modelling Ex. The goal circ(series(parallel(resistor(100),capacitor(0.0001)), parallel(inductor(2),resistor(50))),V,I,60). gives answer I=c(_t23,_t24) V=c(-103.8*_t *_t23,52.7*_t *_t23)

34 34 Tree Layout Example u Drawing a good tree layout is difficult by hand. One approach is using constraints u Nodes at the same level are aligned horizontal u Different levels are spaced 10 apart u Minimum gap 10 between adjacent nodes on the same level u Parent node is above and midway between children u Width of the tree is minimized

35 35 Tree Layout Example u We can write a CLP program that given a tree finds a layout that satisfies these constraints u a association list to map a node to coordinates u predicates for building the constraints u predicate to calculate width u a minimization goal

36 36 Tree Layout Example node(node(node(node(null,kangaroo,null),marsupial,node(null,ko ala,null)),mammal,node(null,monotreme,node(null,platypus,null) )),animal,node(node(node(null,cockatoo,null),parrot(node(null,lo rikeet,null)),bird,node(null,raptor,node(null,eagle,null))))

37 37 Data Structures Summary u Tree constraints provide data structures u accessing and building in the same manner u Records, lists and trees are straightforward u Programs reflect the form of the data struct. u Association lists are useful data structure for attaching information to objects u Hierarchical modelling


Similar presentations

Ads by Google