User:Tom Allen/ta/AddendumT00Z00

From J Wiki
Jump to navigation Jump to search


NB. ... script experimentalZ.ijs ...

NB. ... open/get/put/close array on disk file (utility verbs) ...

arrayPath=:jpath '~temp\'

arrayOpen =:                    1!:21@<@(arrayPath"_,])
arrayGet  =:                [$_".1!:1@<@(arrayPath"_,])
arrayPut  =:[(":!.17@,@[(1!:2)1!:21@])<@(arrayPath"_,])
arrayClose=:                    1!:22@<@(arrayPath"_,])