mirror of
https://github.com/filebrowser/filebrowser.git
synced 2025-05-09 11:42:57 +00:00
0afb9e732c
Former-commit-id: bdede6ed1b6f578f2ef046c338caf02d0b29d453 [formerly 7187de361b53e9c8ec121df379b762f2db736ea2] Former-commit-id: 447d58460fbbfd05ffe08428a1288e392637561d
16 lines
399 B
Plaintext
16 lines
399 B
Plaintext
// ancestors
|
|
parentof("douglas", "john").
|
|
parentof("john", "bob").
|
|
parentof("bob", "ebbon").
|
|
|
|
parentof("douglas", "jane").
|
|
parentof("jane", "jan").
|
|
|
|
ancestorof(A, B) <- parentof(A, B).
|
|
ancestorof(A, C) <- ancestorof(A, B), parentof(B,C).
|
|
|
|
grandparentof(A, B) <- parentof(A, C), parentof(C, B).
|
|
|
|
cousins(A,B) <- grandparentof(C,A), grandparentof(C,B).
|
|
|
|
parentof[`arg](A, B) -> int[32](A), !string(B). |