CATKBEExpressionEngineTypes Types: BaseConcept

Example

Concept Division : BaseConcept
{
                   Attributes
                   {
                                 Inputs
                                 {
                                              Integer dividend;
                                              Integer divisor;
                                 }
                                 Outputs
                                 {
                                              Real quotient;
                                 }
                    }
                    Rules
                    {
                                  Rule
                                  {
                                               if divisor == 0
                                               {
                                                              this->PutInErrorState(TRUE)
                                                              quotient = -1
                                                              Message("Warning : Division by zero occurred !!!")
                                               }
                                              else
                                               {
                                                      Quotient = dividend / divisor
                                               }
                                   }
                    }
}
Concept Computer : BaseConcept
{
                  [...]
                  Children
                  {
                                   Division MyDivider;
                  }
                  Rules
                  {
                                   Rule
                                   {
                                                     [...]
                                                     if MyDivider.GetInErrorState() == TRUE
                                                     {
                                                                        /* The divider result is not usable,
                                                                        we ignore it and put it back to OK state
                                                                        so that the engine can continue */
                                                                        resultOfDivision = 0
                                                                        MyDivider.PutInErrorState(FALSE)
                                                      }
                                                      else
                                                      {
                                                                        resultOfDivision = MyDivider.quotient      
                                                      }
                                  }
}