Datalog playground
right("/file1", "read");
right("/file2", "read");
right("/file2", "write");
check if operation("read");
operation("read");
file("/file1");
can_view($file) <- right($file, "read");
allow if file($f), operation($op), right($f, $op);