[comment {-*- tcl -*- --- doctools ---}]
[vset PACKAGE creditcard::discover]
[vset VERSION 1]
[vset A a]
[vset NAME {Discover creditcard number}]
[vset NAMEX {Discover creditcard number}]
[vset CODE {CREDITCARD DISCOVER}]
[vset OK  ....]
[vset BAD ....]
[vset KEYWORDS k_discover]
[vset REQUIRE r_luhn]
[vset METHODS null]
[vset CODES c_lenpfx]
[include include/vtype.inc]