let
apos fen = sub (afen fen) 0 8