#ABNF 1.0 ISO-8859-1;

language en-US;
mode voice;
tag-format <semantics/1.0>;

root $CreditCardType;

public $CreditCardType = [$Prefix] $Type [please] {out.sltType = rules.Type};

private $Prefix = 
      I got |
      I've got |
      I have |
      I own |
      it is |
      its |
      thats |
      this is |
      (my | the) [new] [credit] card is      
;


private $Type = 
	(
	    [a | the] visa [card] {out = 'Visa'} |
	    [a | the] master card {out = 'MC'} |
    	[an | the] (amex | american express ) [card] {out = 'AmEx'}
    )
;