URL: https://linuxfr.org/forums/programmationautre/posts/prolog-sous-tk-eclipse
Title: Prolog sous TK ECLIPSe
Authors: Sernin
Date: 2006年04月25日T10:25:27+02:00
Tags: 
Score: 0
Bonjour, 
je suis stagiaire en programmation par contraintes et 
je cherche à forcer à 0 certaines cases d'un tableau, pour chaque ligne, de la 1ère à la R ieme case. 
voici ce que j'ai écris mais cela ne marche pas, pourriez vous m'aider ???? 
 
 
 datesdeb(M):- 
 listactivite(L), 
 dim(M,[Nbl,_]), 
 (foreach(A,L),for(I,1,Nbl),param(M) do 
 £spaces£	£/spaces£(activite(A,_,R,_),R2 is R-1,(for(J,1,R2),param(M,I) do(S is M[I,J],S#=0)))). 
 
 
 M est le tableau final, L est une liste d'activité, R est la date de début de lactivité, dc toutes les cases de cette ligne avant R doivent etre nulles</pre>
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="httpS://linuxfr.org/forums/programmationautre/posts/prolog-sous-tk-eclipse.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="httpS://linuxfr.org/forums/programmationautre/posts/prolog-sous-tk-eclipse.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>