!7

!include #1008522 // Analysis Tree

sclass ApplyFunc extends Op {
  S code;
  
  *() {}
  *(S *code) {}
  
  O get(O o) {
    ret evalFunc(code, o);
  }
}

p-tt {
  load("initial");
  if (initial == null) {
    S input1 = loadSnippet(#1008462);
    S input2 = loadSnippet(#1008521);
    initial = new Data(pair(input1, input2));
    Data data = doOp(initial, new ApplyFunc([[
      func(Pair<S, S> p) { unidiff(p.a, p.b) }
    ]]));
  }
  printTree(initial);
  save("initial");
}