Resistor mesh: Difference between revisions
Content added Content deleted
(→{{header|Haskell}}: Added Haskell solution) |
|||
Line 566: | Line 566: | ||
=={{header|Haskell}}== |
=={{header|Haskell}}== |
||
{{trans|Octave}} All mutations are expressed as monoidal operations. |
|||
<lang haskell>{-# LANGUAGE ParallelListComp #-} |
<lang haskell>{-# LANGUAGE ParallelListComp #-} |
||
import Numeric.LinearAlgebra (linearSolve, toDense, (!), flatten) |
import Numeric.LinearAlgebra (linearSolve, toDense, (!), flatten) |