Rosetta Code

Magic squares of doubly even order: Difference between revisions

Page Discussion

Magic squares of doubly even order (view source)

Revision as of 03:21, 1 January 2017

160 bytes removed ,  7 years ago
→‎{{header|AppleScript}}: (Updated primitive – |until| )
(→‎{{header|AppleScript}}: (Updated primitive – |until| ))
Line 226:
on |until|(p, f, x)
set mp to mReturn(p)
set mfv to mReturn(f)x
scripttell iteratemReturn(f)
propertyrepeat p :until mp's lambda(v)
property f : mf's set v to lambda(v)
end repeat
end on lambda(v)tell
return v▼
repeat until p(v)
set v to f(v)
end repeat
▲ return v
end lambda
end script
iterate's lambda(x)
end |until|
 
Hout
9,659

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/265929"