programme = "A"
programme = sub("A","AGADADAAGAGADA",programme)
programme = sub("A","AGADADAAGAGADA",programme)
programme = sub("A","AGADADAAGAGADA",programme)
Toto((programme+"D")*4)