sclass Scored<A> extends Var<A> {
  float score;
  
  *() {}
  *(A a, float *score) { super(a); }
  
  float score() { ret score; }
}