POUR TANTQUE :COND :ACTION SI NON (FAIS :COND )ALORS [STOP ] FAIS :ACTION TANTQUE :COND :ACTION FIN POUR FOR :FLIST :ACTION FORLOOP (VAR :FLIST )(INITIAL :FLIST )(FINAL :FLIST ):ACTION FIN POUR FORLOOP :VAR :INITIAL :FINAL :ACTION SI :INITIAL > :FINAL ALORS [STOP ] RELIE :VAR :INITIAL FAIS :ACTION FORLOOP :VAR (:INITIAL + 1 ):FINAL :ACTION FIN POUR VAR :FLIST DONNE PREM :FLIST FIN POUR INITIAL :FLIST DONNE PREM SP :FLIST FIN POUR FINAL :FLIST DONNE DER :FLIST FIN