File standardInput readLines map(split("/")map(asNumber)reduce(n,d,a:=n;b:=d while(0a,"/".. d/a,""))))