mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-15 01:13:30 +00:00
15 lines
334 B
Mathematica
15 lines
334 B
Mathematica
%---------------------------------------------------------------------------%
|
|
% vim: ft=mercury ts=4 sw=4 et
|
|
%---------------------------------------------------------------------------%
|
|
|
|
:- module bug506.
|
|
:- interface.
|
|
|
|
:- import_module bug506_helper_1.
|
|
|
|
:- func make_rule(int) = (rule).
|
|
|
|
:- implementation.
|
|
|
|
make_rule(N) = rule(N).
|