david_prog_seq_controle_un