urbit/pkg/arvo/gen/sql.hoon

/+  *custody,
    *csv
|=  [=key=path =loc=path]
%.  ~
%-  print-rows
%+  select
  !,  *hoon
  :*  (need ship.left)
      physical-form.left
  ==
%^    join
    (load:keys key-path)
  (load:locations loc-path)
!,  *hoon
?&  !=(~ ship.left)
    =(location.left location.right)
==
custody: add more types 2019-10-22 01:41:28 +03:00			`/+ *custody,`
			`*csv`
custody: initial commit 2019-10-09 04:35:22 +03:00			`\|= [=key=path =loc=path]`
			`%. ~`
			`%- print-rows`
			`%+ select`
			`!, *hoon`
			`:* (need ship.left)`
			`physical-form.left`
			`==`
			`%^ join`
			`(load:keys key-path)`
			`(load:locations loc-path)`
			`!, *hoon`
			`?& !=(~ ship.left)`
			`=(location.left location.right)`
			`==`