biocham.pl 281 Bytes
Newer Older
Thierry Martinez's avatar
Thierry Martinez committed
1 2 3
:- module(
  biocham,
  [
Thierry Martinez's avatar
Thierry Martinez committed
4 5
    start/0,
    initialize/0,
Thierry Martinez's avatar
Thierry Martinez committed
6 7
    biocham_command/0,
    biocham_command/1
Thierry Martinez's avatar
Thierry Martinez committed
8 9
  ]).

Thierry Martinez's avatar
Thierry Martinez committed
10 11 12 13 14 15 16 17 18

start :-
  about,
  initialize,
  do_arguments.


initialize :-
  prolog_history(enable),
Thierry Martinez's avatar
Thierry Martinez committed
19 20
  set_counter(item_id, 0),
  new_model.
Thierry Martinez's avatar
Thierry Martinez committed
21 22


Thierry Martinez's avatar
Thierry Martinez committed
23
biocham_command.
Thierry Martinez's avatar
Thierry Martinez committed
24 25 26


biocham_command(_).