:- module(_1,[dup_first/2],[assertions]).

dup_first([A|B],[A,A|B]).


