Advertisement
Guest User

Untitled

a guest
Mar 13th, 2019
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 3.71 KB | None | 0 0
  1. (* BR phylogénie *)
  2. let br_phylo = {
  3.   regles = [
  4.     {
  5.       num = 1;
  6.       antecedents = [ {nom = "tete"; neg = 0}; {nom = "yeux"; neg = 0} ];
  7.       consequent = {nom = "animal"; neg = 0};
  8.       compteur = 0
  9.     };
  10.     {
  11.       num = 2;
  12.       antecedents = [ {nom = "queue"; neg = 0}; {nom = "squelette-interne"; neg = 0}; {nom = "animal"; neg = 0} ];
  13.       consequent = {nom = "vertébré"; neg = 0};
  14.       compteur = 0
  15.     };
  16.     {
  17.       num = 3;
  18.       antecedents = [ {nom = "4-membres"; neg = 0}; {nom = "poils"; neg = 0}; {nom = "vertébré"; neg = 0} ];
  19.       consequent = {nom = "mammifère"; neg = 0};
  20.       compteur = 0
  21.     };
  22.     {
  23.       num = 4;
  24.       antecedents = [ {nom = "nageoires"; neg = 0}; {nom = "vertébré"; neg = 0} ];
  25.       consequent = {nom = "truite"; neg = 0};
  26.       compteur = 0
  27.     };
  28.     {
  29.       num = 5;
  30.       antecedents = [ {nom = "mammifère"; neg = 0}; {nom = "trompe"; neg = 0} ];
  31.       consequent = {nom = "éléphant"; neg = 0};
  32.       compteur = 0
  33.     };
  34.     {
  35.       num = 6;
  36.       antecedents = [ {nom = "mammifère"; neg = 0}; {nom = "ailes"; neg = 0} ];
  37.       consequent = {nom = "chauve-souris"; neg = 0};
  38.       compteur = 0
  39.     };
  40.     {
  41.       num = 7;
  42.       antecedents = [ {nom = "mammifère"; neg = 0}; {nom = "pouce-opposable"; neg = 0} ];
  43.       consequent = {nom = "humain"; neg = 0};
  44.       compteur = 0
  45.     };
  46.     {
  47.       num = 8;
  48.       antecedents = [ {nom = "plumes"; neg = 0}; {nom = "bec"; neg = 0}; {nom = "vertébré"; neg = 0} ];
  49.       consequent = {nom = "poule"; neg = 0};
  50.       compteur = 0
  51.     };
  52.     {
  53.       num = 9;
  54.       antecedents = [ {nom = "plumes"; neg = 1}; {nom = "bec"; neg = 1}; {nom = "vertébré"; neg = 0} ];
  55.       consequent = {nom = "lezard"; neg = 0};
  56.       compteur = 0
  57.     };
  58.     {
  59.       num = 10;
  60.       antecedents = [ {nom = "coquille"; neg = 0}; {nom = "pied"; neg = 0}; {nom = "tentacule"; neg = 0} ];
  61.       consequent = {nom = "escargot"; neg = 0};
  62.       compteur = 0
  63.     };
  64.     {
  65.       num = 11;
  66.       antecedents = [ {nom = "antennes"; neg = 0}; {nom = "6-pattes"; neg = 0}; {nom = "ailes-membraneuses"; neg = 0}; {nom = "squelette-externe"; neg = 0} ];
  67.       consequent = {nom = "insecte"; neg = 0};
  68.       compteur = 0
  69.     };
  70.     {
  71.       num = 12;
  72.       antecedents = [ {nom = "elytre"; neg = 0}; {nom = "insecte"; neg = 0} ];
  73.       consequent = {nom = "hanneton"; neg = 0};
  74.       compteur = 0
  75.     };
  76.     {
  77.       num = 13;
  78.       antecedents = [ {nom = "elytre"; neg = 1}; {nom = "insecte"; neg = 0} ];
  79.       consequent = {nom = "criquet"; neg = 0};
  80.       compteur = 0
  81.     };
  82.     {
  83.       num = 14;
  84.       antecedents = [ {nom = "ecailles-soudees"; neg = 0}; {nom = "reptile"; neg = 0}];
  85.       consequent = {nom = "lezard"; neg = 0};
  86.       compteur = 0
  87.     };
  88.     {
  89.       num = 15;
  90.       antecedents = [ {nom = "coquille-pointue"; neg = 0}; {nom = "escargot"; neg = 0}; ];
  91.       consequent = {nom = "limnée"; neg = 0};
  92.       compteur = 0
  93.     };
  94.     {
  95.       num = 16;
  96.       antecedents = [ {nom = "mammifère"; neg = 0}; {nom = "grandes-oreilles"; neg = 0}; ];
  97.       consequent = {nom = "lapin"; neg = 0};
  98.       compteur = 0
  99.     };
  100.     {
  101.       num = 17;
  102.       antecedents = [ {nom = "elytre"; neg = 0}; {nom = "insecte"; neg = 0}; {nom = "phytophage"; neg = 0} ];
  103.       consequent = {nom = "coccinelle"; neg = 0};
  104.       compteur = 0
  105.     };
  106.     {
  107.       num = 18;
  108.       antecedents = [ {nom = "elytre"; neg = 0}; {nom = "coprophage"; neg = 0} ];
  109.       consequent = {nom = "scarabé"; neg = 0};
  110.       compteur = 0
  111.     };
  112.     {
  113.       num = 19;
  114.       antecedents = [ {nom = "animal"; neg = 0}; {nom = "tentacule"; neg = 0} ];
  115.       consequent = {nom = "pieuvre"; neg = 0};
  116.       compteur = 0
  117.     };
  118.   ]
  119. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement