-module(p).
-export([m/0]).
m()->[io:format("~.*b
",[X,16])||X<-lists:seq(16,2,-1)].