ychr-0.1.0.0: test/golden/open_class_basic/a_owner.chr
:- module(owner, [classify/1, run/2]). :- open_class (classify(int) -> int). classify(0) -> 100. :- chr_constraint run(any, any). run(X, R) <=> R is classify(X).
:- module(owner, [classify/1, run/2]). :- open_class (classify(int) -> int). classify(0) -> 100. :- chr_constraint run(any, any). run(X, R) <=> R is classify(X).