15 lines
100 B
Plaintext
15 lines
100 B
Plaintext
|
:- object(q2,
|
||
|
|
extends(square)).
|
||
|
|
|
||
|
|
|
||
|
|
position(2, 3).
|
||
|
|
|
||
|
|
|
||
|
|
color(blue).
|
||
|
|
|
||
|
|
|
||
|
|
side(3).
|
||
|
|
|
||
|
|
|
||
|
|
:- end_object.
|