Deconvolution/1D: Difference between revisions

Content added Content deleted
m (→‎{{header|Raku}}: Fix link: Perl 6 --> Raku)
m (Removed useless “$”.)
Line 849: Line 849:
let g = [24'f64, 75, 71, -34, 3, 22, -45, 23, 245, 25, 52, 25, -67, -96,
let g = [24'f64, 75, 71, -34, 3, 22, -45, 23, 245, 25, 52, 25, -67, -96,
96, 31, 55, 36, 29, -43, -7]
96, 31, 55, 36, 29, -43, -7]
echo $h
echo h
echo $deconv(g, f)
echo deconv(g, f)
echo $f
echo f
echo $deconv(g, h)</lang>
echo deconv(g, h)</lang>
{{out}}
{{out}}
<pre>
<pre>