1:- module(rint, [interval/2, interval/3, op(150, xfx, ...), op(800, xfx, <-)]).

Use intervals in R functions.

This module expands the 'interval' module with R functions. For general information on the use of interval/2 and interval/3, please refer to that module. For better compatibility with R, the standard built-in arithmetic evaluation is used instead of the library clpBNR as in the module 'interval'. */

   11% Supported functions:
   12%   Assignment 
   13%       - '<-'
   14%       
   15%   Binomial distribution
   16%       - Cumulated density with default lower tail: interval(pbinom(X, N, P), Res)
   17%       - Cumulated density with explicit tail argument: interval(pbinom(X, N, P, true), Res)
   18%       - Quantile with default lower tail: interval(qbinom(Alpha, N, P), Res)
   19%       - Quantilewith explicit tail argument: interval(qbinom(Alpha, N, P, true), Res)
   20%       - Density: interval(dbinom(X, N, P), Res)
   21%
   22%   Normal distribution
   23%       - Cumulated density with defaults: interval(pnorm(X), Res)
   24%       - Cumulated density with default lower tail: interval(pnorm(X, Mu, Sd), Res)
   25%       - Cumulated density with explicit tail argument: interval(pnorm(X, Mu, Sd, false), Res)
   26%       - Quantile with defaults: interval(qnorm(P), Res)
   27%       - Quantile with default lower tail: interval(qnorm(P, Mu, Sigma), Res)
   28%       - Quantile with explicit tail argument: interval(qnorm(P, Mu, Sigma, true), Res)
   29%       - Density with defaults: interval(dnorm(X), Res)
   30%       - Density: interval(dnorm(X, Mu, Sigma), Res)
   31%
   32%   T distribution
   33%       - Cumulated density with default lower tail: interval(pt(X, Df), Res)
   34%       - Cumulated density explicit tail argument: interval(pt(X, Df, false), Res)
   35%       - Quantile with default lower tail: interval(qt(P, Df), Res)
   36%       - Quantile with explicit tail argument: interval(qt(P, Df, true), Res)
   37%       - Density: interval(dt(X, Df), Res)
   38%
   39%   Chi-square distribution
   40%       - Cumulated density with default lower tail: interval(pchisq(X, Df), Res)
   41%       - Cumulated density explicit tail argument: interval(pchisq(X, Df, false), Res)
   42%       - Quantile with default lower tail: interval(qchisq(P, Df), Res)
   43%       - Quantile with explicit tail argument: interval(qchisq(P, Df, true), Res)
   44%       - Density: interval(dchisq(X, Df), Res)
   45
   46:- set_prolog_flag(float_overflow, infinity).   47:- set_prolog_flag(float_undefined, nan).   48:- set_prolog_flag(float_zero_div, infinity).   49
   50:- nb_setval(digits, 2).   51
   52:- consult(['../inst/prolog/lib/interface', 
   53            '../inst/prolog/lib/rint_op', 
   54            '../inst/prolog/lib/op', 
   55            '../inst/prolog/lib/eval_r',
   56            'r', 
   57            '../inst/prolog/lib/utility']).