example2.od 485 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  1. f1:Geranium {
  2. flowering = True;
  3. }
  4. f2:Geranium {
  5. flowering = True;
  6. }
  7. f3:Geranium {
  8. flowering = False;
  9. }
  10. p1:Pot {
  11. cracked = True;
  12. }
  13. :Planted (f1 -> p1)
  14. :Planted (f2 -> p1)
  15. :Planted (f3 -> p1)
  16. f4:Geranium {
  17. flowering = True;
  18. }
  19. p2:Pot {
  20. cracked = True;
  21. }
  22. :Planted (f4 -> p2)
  23. f5:Geranium {
  24. flowering = True;
  25. }
  26. p3:Pot {
  27. cracked = False;
  28. }
  29. :Planted (f5 -> p3)
  30. f6:Geranium {
  31. flowering = False;
  32. }
  33. p4:Pot {
  34. cracked = True;
  35. }
  36. :Planted (f6 -> p4)