URL: https://linuxfr.org/forums/programmationautre/posts/haskell
Title: Haskell
Authors: eoutin
Date: 2010年04月10日T05:25:29+02:00
Tags: 
Score: 1
Bonjour, 
je pars d'une liste de liste : l1=[[1,2,3],[4,5,6],[7,8,9]] :: [[Int]] 
et je voudrais faire la somme des 2 diagonales. Par exemple dans ce cas là : 1+5+9 grâce à une fonction sommeDiag1 et faire 3+5+7 avec sommeDiag2. 
Je ne vois pas bien comment faire. 
Si quelqu'un a une idée. 
 
Voici ce que j'ai commencé : 
 
 sommeDiag1 :: [[Int]] -> Int 
 sommeDiag1 [] = 0 
 sommeDiag1 (x:xs) = let i = 1 
 £spaces£ £/spaces£in (head x)!!i + sommeDiag1 xs 
 
 
Merci
</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/haskell.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://linuxfr.org/forums/programmationautre/posts/haskell.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>