Magic squares of doubly even order: Difference between revisions
Content added Content deleted
m (→{{header|Haskell}}: layout) |
(→{{header|AppleScript}}: (Updated primitive – |until| )) |
||
Line 226: | Line 226: | ||
on |until|(p, f, x) |
on |until|(p, f, x) |
||
set mp to mReturn(p) |
set mp to mReturn(p) |
||
set |
set v to x |
||
tell mReturn(f) |
|||
repeat until mp's lambda(v) |
|||
set v to lambda(v) |
|||
end repeat |
|||
end tell |
|||
⚫ | |||
repeat until p(v) |
|||
set v to f(v) |
|||
end repeat |
|||
⚫ | |||
end lambda |
|||
end script |
|||
iterate's lambda(x) |
|||
end |until| |
end |until| |
||