def look
import ezx@1.11.0.0/src/doctor/world.bend as Worldimport Base
124# the first answer given to a question
125def look(rs: List<&2, Reply>, +want: String) -> Heard:
126 match rs:
127 case []:
128 Open{}
129 case Reply{ask, answer} <> t:
130 look.step(String.eq(key(ask), want), answer, _u => look(t, want))