Re: [Syracuse] [metpost] boucle forsuffixes

Bonjour,

Le 04/12/06, david.cobac<david.cobac@free.fr> a écrit :
> Bonjour,
> dans une boucle forsuffixes, j'ai besoin de la valeur précédente de la
> variable. J'ai essayé un truc comme cela mais ça ne marche pas.
> Il semblerait que le type str ne fonctionne pas dans cet usage.
> (t désigne des noms de boites définies avec boxit)
>
> vardef sepfratrie (text t) :=
> str pdt;
> %% on place correctement les boîtes rlativement
> %% et horizontalement
> i:=1;
> forsuffixes $=t :
> if (i<>1) :
> pdt.e=$.w-(hsepf,0);
> fi;
> pdt:=$;
> i:=2;
> endfor;
> enddef;

Et si tu essaies cela :

vardef sepfratrie (text t) =
  save pdt, p, i; i := 1;
  forsuffixes p=t:
    if ( i > 1) :
pdt.e =p.w-(hsepf,0); fi;
    pdt := p; i:= 2;
  endfor;
enddef;

>
> --
> cordialement
> david cobac
_______________________________________________
Liste de diffusion Syracuse
Syracuse@melusine.eu.org
http://melusine.eu.org/cgi-bin/mailman/listinfo/syracuse
Adresses alternatives du site :
http://syracuse.eu.org/syracuse/
http://193.55.139.7/syracuse/
Received on Mon Dec 4 14:08:57 2006