((rec,r,(max(+(case(read)((i)1)((d)-1)('s,(*(if(= r 16)0 r)r))('o(print r)0))r)0))0)