Decision tables: Difference between revisions

m
m (J: shorten data lines)
Line 26:
'q a'=.x
smoutput 'Having trouble? Let''s track down the problem:'
options=. a #~ y {~ #. 'Y'={.@toupper@deb@(1!:1)@1:@smoutput@:,&'?'&dtb"1 q
(,~ ('/'cut'Suggested resolutions:/Solution unknown.') {::~ 0=#) options
)</lang>
6,962

edits