Merged with upstream. Updated M (aka MUMPS) detection to use the new bayesian / samples method.

This commit is contained in:
Laurent Parenteau
2013-03-14 11:33:09 -04:00
472 changed files with 179182 additions and 1762 deletions

17
samples/M/nesting.m Normal file
View File

@@ -0,0 +1,17 @@
start1 ; entry label
set ax=1
set bx=20
set cx=2
set ay=1
set by=20
set cy=2
set sumx=0
set sqrx=0
set sumxy=0
for x=ax:cx:bx do
. set sumx=sumx+x
. set sqrx=sqrx+(x*x)
. for y=ay:cy:by do
.. set sumxy=sumxy+(x*y)
.. if (sumxy<100) do
... write sumxy,!