p:*0:"day1"; v:("("=p)-(")"=p); +/v / final floor 1+*&-1=+\v / first time in cellar