use v6.d;

use lib '.';
use lib './lib';

use DSL::English::QuantileRegressionWorkflows::Grammar;


use Test;

plan 5;

# Shortcut
my $pQRMONCOMMAND = DSL::English::QuantileRegressionWorkflows::Grammar;

#-----------------------------------------------------------
# Quantile Regression fit
#-----------------------------------------------------------

ok $pQRMONCOMMAND.parse('compute least squares regression'),
        'compute least squares regression';

ok $pQRMONCOMMAND.parse('compute least squares fit'),
        'compute least squares fit';

ok $pQRMONCOMMAND.parse('compute quantile regression fit with functions Table[Sin[x],{x,0,10,2}]'),
        'compute quantile regression fit with functions Table[Sin[x],{x,0,10,2}]';

ok $pQRMONCOMMAND.parse('compute quantile regression fit with functions Table[Sin[x],{x,0,10,2}] and proabilities 0.1, 0.2, and 0.6'),
        'compute quantile regression fit with functions Table[Sin[x],{x,0,10,2}] and proabilities 0.1, 0.2, and 0.6';

ok $pQRMONCOMMAND.parse('compute quantile regression fit with quantiles 0.1, 0.2, and 0.6 and functions Table[Sin[x],{x,0,10,2}]'),
        'compute quantile regression fit with quantiles 0.1, 0.2, and 0.6 and functions Table[Sin[x],{x,0,10,2}]';

done-testing;
