%      Production system KORE/IE (version 12.48)
%
%          (C)1992 Institute for New Generation Computer Technology
%                          (Read COPYRIGHT for detailed information)
%
%      1992.7 Check and refine every programs 
%                             for IFS (ICOT Free Software) release.
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%% QUINTUS_INIT %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%% change unknown mode
:- unknown(_,fail).

%%%%% define operator \
:- op(490,fx,(\)).

%%%%% compile Quintus Prolog Library of Unix
:- compile(library(unix)).
:- compile(library(tcp)).
:- compile(library(date)).

%%%%%
about_version(V):-
	write('******** KORE/IE (Version '),
	write(V),
	write(') ********'),
	nl.

