use v6.d;

use DSL::English::FoodPreparationWorkflows;
use DSL::Entity::Foods;
use DSL::Entity::Geographics;
use Test;


##===========================================================
## Sanity check commands
##===========================================================

my $pCOMMAND = DSL::English::FoodPreparationWorkflows::Grammar;
$pCOMMAND.set-foods-resources(DSL::Entity::Foods::resource-access-object());
$pCOMMAND.set-geographics-resources(DSL::Entity::Geographics::resource-access-object());


## The list of tests here is for illustration purposes.
## The list is made of small samples of more dedicated tests.

plan 9;

ok $pCOMMAND.parse('what number of dishes have low carbs'),
        'what number of dishes have low carbs';

ok $pCOMMAND.parse('how many dishes have saturated fats'),
        'how many dishes have saturated fats';

ok $pCOMMAND.parse('what do i eat for lunch'),
        'what do i eat for lunch';

ok $pCOMMAND.parse('what do i cook during easter'),
        'what do i cook during easter';

ok $pCOMMAND.parse('recommend dishes to cook'),
        'recommend dishes to cook';

ok $pCOMMAND.parse('recommend a few courses'),
        'recommend a few courses';

ok $pCOMMAND.parse('recommend a few courses to experiment with'),
        'recommend a few courses to experiment with';

ok $pCOMMAND.parse('recommend a few courses from china'),
        'recommend a few courses from china';

ok $pCOMMAND.parse('suggest a recipe with low carbs'),
        'suggest a recipe with low carbs';

done-testing;
