medusa% pl
Welcome to SWI-Prolog (Version 3.2.9)
Copyright (c) 1993-1999 University of Amsterdam. All rights reserved.
For help, use ?- help(Topic). or ?- apropos(Word).
?- consult(company).
company compiled, 0.00 sec, 6,824 bytes.
Yes
?- consult(rules).
rules compiled, 0.00 sec, 3,392 bytes.
Yes
?- employee_print(_).
john smithson 123456789 1965-01-09 731 Fondren, Houston, TX m 30000 333445555 5
franklin wong 333445555 1955-12-08 638 Voss, Houston, TX m 40000 888665555 5
alicia zelaya 999887777 1968-07-19 3321 Castle, Spring, TX f 25000 987654321 4
jenny wallace 987654321 1941-06-20 291 Berry, Bellaire, TX f 43000 888665555 4
ramesh narayan 666884444 1962-09-15 975 Fire Oak, Humble, TX m 38000 333445555 5
joyce english 453453453 1972-07-31 5632 Rice, Houston, TX f 25000 333445555 5
ahmad jabbar 987987987 1969-03-29 980 Dallas, Houston, TX m 25000 987654321 4
james borgin 888665555 1937-11-10 450 Stone, Houston, TX m 55000 0 1
No
?- employee_html(_).
<table border><tr><td>john</td><td>smithson</td><td>123456789</td><td>1965-01-09</td><td>731 Fondren, Houston, TX </td><td>m</td><td>30000</td><td>333445555</td><td>5</td></tr><tr><td>
franklin</td><td>wong</td><td>333445555</td><td>1955-12-08</td><td>638 Voss, Houston, TX </td><td>m</td><td>40000</td><td>888665555</td><td>5</td></tr><tr><td>
alicia</td><td>zelaya</td><td>999887777</td><td>1968-07-19</td><td>3321 Castle, Spring, TX </td><td>f</td><td>25000</td><td>987654321</td><td>4</td></tr><tr><td>
jenny</td><td>wallace</td><td>987654321</td><td>1941-06-20</td><td>291 Berry, Bellaire, TX </td><td>f</td><td>43000</td><td>888665555</td><td>4</td></tr><tr><td>
ramesh</td><td>narayan</td><td>666884444</td><td>1962-09-15</td><td>975 Fire Oak, Humble, TX </td><td>m</td><td>38000</td><td>333445555</td><td>5</td></tr><tr><td>
joyce</td><td>english</td><td>453453453</td><td>1972-07-31</td><td>5632 Rice, Houston, TX </td><td>f</td><td>25000</td><td>333445555</td><td>5</td></tr><tr><td>
ahmad</td><td>jabbar</td><td>987987987</td><td>1969-03-29</td><td>980 Dallas, Houston, TX </td><td>m</td><td>25000</td><td>987654321</td><td>4</td></tr><tr><td>
james</td><td>borgin</td><td>888665555</td><td>1937-11-10</td><td>450 Stone, Houston, TX </td><td>m</td><td>55000</td><td>0</td><td>1</td></tr><tr><td>
</td></tr></table>
Yes
?- employee_supervisor_print(_).
john smithson has supervisor: wong
franklin wong has supervisor: borgin
alicia zelaya has supervisor: wallace
jenny wallace has supervisor: borgin
ramesh narayan has supervisor: wong
joyce english has supervisor: wong
ahmad jabbar has supervisor: wallace
No
?- halt.
medusa%
Finally, here is the html table above interpreted as html:
| john | smithson | 123456789 | 1965-01-09 | 731 Fondren, Houston, TX | m | 30000 | 333445555 | 5 |
|
franklin | wong | 333445555 | 1955-12-08 | 638 Voss, Houston, TX | m | 40000 | 888665555 | 5 |
|
alicia | zelaya | 999887777 | 1968-07-19 | 3321 Castle, Spring, TX | f | 25000 | 987654321 | 4 |
|
jenny | wallace | 987654321 | 1941-06-20 | 291 Berry, Bellaire, TX | f | 43000 | 888665555 | 4 |
|
ramesh | narayan | 666884444 | 1962-09-15 | 975 Fire Oak, Humble, TX | m | 38000 | 333445555 | 5 |
|
joyce | english | 453453453 | 1972-07-31 | 5632 Rice, Houston, TX | f | 25000 | 333445555 | 5 |
|
ahmad | jabbar | 987987987 | 1969-03-29 | 980 Dallas, Houston, TX | m | 25000 | 987654321 | 4 |
|
james | borgin | 888665555 | 1937-11-10 | 450 Stone, Houston, TX | m | 55000 | 0 | 1 |
|
|