<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_84pv18qafjosco9f320fhb18f3, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
!7

srecord NLPattern(S pat) {}
srecord Definition(O lhs, O rhs) {}
srecord PatternMatches(O pat, O s) {}

sS defs = [[
A cup of water = A cup with water inside
A cup of Peter = A cup that belongs to Peter
A cup of glass = A cup that consists of glass
A cup of style = A cup that has a lot of style
]];

p-exp {
  new LinkedHashSet objects;
  
  for (S s : tlft(defs)) {
    L<S> l = splitAtJavaToken(s, "=");
    objects.add(Definition(first(l), second(l)));
  }
  
  L<Definition> defs = instancesOf(Definition, objects);
  for (Definition a : defs)
    for (Definition b : defs)
      if (a.lhs instanceof S && b.lhs instanceof S) {
        S pat = combineToNLPattern((S) a.lhs, (S) b.lhs);
        if (pat != null)
          objects.add(NLPattern(pat));
      }
  
  pnlStruct(objects);
}