Présentation de 1091.jps

/syracuse/bbgraf/tmp/1091.jpg
-6 6 setxrange %% intervalle de l'image sur Ox -3 7 setyrange %% intervalle de l'image sur Oy 30 setxunit %% taille d'une unite sur Ox /facteur .6 def %% facteur d'agrandissement/reduction pour les cartes /vadjust 50 def /i 0 def [ (07-trefle) (08-trefle) (09-trefle) (10-trefle) (V-trefle) (D-trefle) (R-trefle) ] { 0 0 [facteur dup] {60 i add} 5 -1 roll ucpict /i i 180 12 div sub store } apply