norm("Be friendly").

+!reply
  :   user_said(Message)
  <-  .findall(Norm, norm(Norm), Norms);
      .reply(Message, Norms).

+user_said(Message)
  <-  .notify_user_said(Message);
      !reply.

+!transition_phase <- true.
+!check_triggers <- true.