Intersecting number wheels: Difference between revisions

Content added Content deleted
m (J: remove redundant reference to z locale)
m (J: style)
Line 1,034: Line 1,034:
grp=. cocreate ''
grp=. cocreate ''
coinsert__grp 'wheelgroup'
coinsert__grp 'wheelgroup'
specs__grp=.cut each boxopen m
specs__grp=: cut each boxopen m
wheel__grp=:;{.wheels__grp=: {.every specs__grp
wheel__grp=: ;{.wheels__grp=: {.every specs__grp
init__grp=:{{('inds';wheels)=:(0#~#specs);}.each specs}}
init__grp=: {{('inds';wheels)=:(0#~#specs);}.each specs}}
init__grp''
init__grp''
('gen_',(;grp),'_')~
('gen_',(;grp),'_')~