Numerical integration: Difference between revisions

Content deleted Content added
Tikkanz (talk | contribs)
→‎{{header|J}}: use symbols
Tikkanz (talk | contribs)
Line 843: Line 843:
)
)


rectangle=: adverb define
rectangle=: adverb def 'u -: +/ y'
u -: +/ y
)


trapezium=: adverb define
trapezium=: adverb def '-: +/ u y'
-: +/ u y
)


simpson=: adverb define
simpson =: adverb def '6 %~ 1 1 4 +/ .* u y, -:+/y'</lang>
(6 %~ [: +/ 4&*@u@-:@(+/) , u) y
)</lang>
'''Example usage'''<br>
'''Example usage'''<br>
Integrate <code>square</code> (<code>*:</code>) from 0 to &pi; in 10 steps using various methods.
Integrate <code>square</code> (<code>*:</code>) from 0 to &pi; in 10 steps using various methods.