﻿⍝ Futures and Isolate scripts
⍝ Part 5 - Shared data
isolate.Config ''
isolate.Config 'listen' 1 ⍝ listen for callbacks
isolate.Reset 0
COUNTER←1
{##.COUNTER←##.COUNTER+⍵} IÏ 1 1 1 1
COUNTER
1 3 2 4 {z←⎕DL ⍺ ⋄ ##.COUNTER←##.COUNTER+⍵} IÏ 1 1 1 1
⎕FX 'R←Increment X' 'R←COUNTER←COUNTER+X'
⎕VR 'Increment'
COUNTER←1
{##.Increment ⍵} IÏ 1 1 1 1
COUNTER
⍝ Exercises 5a and 5b