This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/cplint/examples/mendel.uni

14 lines
215 B
Plaintext
Raw Normal View History

mode(mother(person,person)).
mode(father(person,person)).
mode(cg(person,chr,allele)).
type(person,[s,m,f,mm,fm,mf,ff]).
type(chr,[1,2]).
type(allele,[p,w]).
universe(['X'],[s,m,f]).
universe(['A','B'],[p,w]).