Data commit

Task/Abbreviations-simple/J/abbreviations-simple-1.j

@@ -0,0 +1,19 @@
+ctable=:|:(({.;~{:@(_,".)@;@}.);.1~ _2<nc) cut {{)n
+   add 1  alter 3  backup 2  bottom 1  Cappend 2  change 1  Schange  Cinsert 2  Clast 3
+   compress 4 copy 2 count 3 Coverlay 3 cursor 3  delete 3 Cdelete 2  down 1  duplicate
+   3 xEdit 1 expand 3 extract 3  find 1 Nfind 2 Nfindup 6 NfUP 3 Cfind 2 findUP 3 fUP 2
+   forward 2  get  help 1 hexType 4  input 1 powerInput 3  join 1 split 2 spltJOIN load
+   locate 1 Clocate 2 lowerCase 3 upperCase 3 Lprefix 2  macro  merge 2 modify 3 move 2
+   msg  next 1 overlay 1 parse preserve 4 purge 3 put putD query 1 quit  read recover 3
+   refresh renum 3 repeat 3 replace 1 Creplace 2 reset 3 restore 4 rgtLEFT right 2 left
+   2  save  set  shift 2  si  sort  sos  stack 3 status 4 top  transfer 3  type 1  up 1
+}} -.LF
+
+findmatch=: {{
+  lens=. >{.ctable
+  for_ndx. I.y-:"1&tolower (#y){.&> list do. cmd=. ;(<1,ndx){ctable
+    if. (#y) >: ndx{lens do. toupper cmd return. end.
+    if. y -: cmd do. toupper cmd return. end.
+  end.
+  '*error*'
+}}L:0

Task/Abbreviations-simple/J/abbreviations-simple-2.j

@@ -0,0 +1,2 @@
+   ;:inv findmatch cut ' riG   rePEAT copies  put mo   rest    types   fup.    6       poweRin'
+RIGHT REPEAT *error* PUT MOVE RESTORE *error* *error* *error* POWERINPUT