demos/eq.c

   1 #include "cll1.h"
   2
   3 program
   4 {
   5  str a,b;
   6
   7  a="¾luklý";
   8  b="®LUKLÝ";
   9  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  10  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  11  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  12  a="aabc";
  13  b="axyz";
  14  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  15  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  16  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  17  a="ABC";
  18  b="abc";
  19  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  20  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  21  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  22  a="abc";
  23  b="abc";
  24  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  25  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  26  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  27  a=NULL;
  28  b="abc";
  29  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  30  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  31  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  32  a=NULL;
  33  b=NULL;
  34  printf("str_order(\"%s\",\"%s\")=%d\n",a,b,str_order(a,b));
  35  printf("eq(\"%s\",\"%s\")=%s\n",a,b,btoa(eq(a,b)));
  36  printf("eqi(\"%s\",\"%s\")=%s\n",a,b,btoa(eqi(a,b)));
  37 }