diag

it is the Data Mining Algorithm source code.

   Vnone:diff:$none:none:0 | \
   Ve1.1:diff:$blue:1.1/1.5/1.8:1 | \
   Ve1.5:diff:$blue::-1 | \
   Ve1.8:diff:$blue::-1 | \
   Ve1.9:diff:$limit:1.9:2" \
   wine3.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Vm0.1:diff:$blue:0.1/0.3/0.7:1 | \
   Vm0.3:diff:$blue::-1 | \
   Vm0.7:diff:$blue::-1 | \
   Vm0.8:diff:$limit:0.8:2" \
   wine3.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Vresilient:diff:$green:resilient:2 | \
   Vquick:diff:$red:quick:3 | \
   Vadaptive:diff:$blue:adaptive:1" \
   wine3.res "$out"
let i++

if [[ $file == "" ]]; then term; fi

echo "done."
fi

#-----------------------------------------------------------------------
# wine 6
#-----------------------------------------------------------------------

if [[ $data == "all" || $data == "wine6" ]]; then
if [[ $file == "" ]]; then start wine6.mp; fi
echo -n "processing wine6 ... "

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none00:diff:$trial:trials:0 | \
   none01:diff:$trial::-1 | \
   none02:diff:$trial::-1 | \
   none03:diff:$trial::-1 | \
   none04:diff:$trial::-1 | \
   none05:diff:$trial::-1 | \
   none06:diff:$trial::-1 | \
   none07:diff:$trial::-1 | \
   none08:diff:$trial::-1 | \
   none09:diff:$trial::-1 | \
   none10:diff:$trial::-1 | \
   none11:diff:$trial::-1 | \
   none12:diff:$trial::-1 | \
   none13:diff:$trial::-1 | \
   none14:diff:$trial::-1 | \
   none15:diff:$trial::-1 | \
   none16:diff:$trial::-1 | \
   none17:diff:$trial::-1 | \
   none18:diff:$trial::-1 | \
   none19:diff:$trial::-1 | \
   none:diff:$mean:average:1" \
   wine6.trl "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone00:diff:$trial:trials:0 | \
   vnone01:diff:$trial::-1 | \
   vnone02:diff:$trial::-1 | \
   vnone03:diff:$trial::-1 | \
   vnone04:diff:$trial::-1 | \
   vnone05:diff:$trial::-1 | \
   vnone06:diff:$trial::-1 | \
   vnone07:diff:$trial::-1 | \
   vnone08:diff:$trial::-1 | \
   vnone09:diff:$trial::-1 | \
   vnone10:diff:$trial::-1 | \
   vnone11:diff:$trial::-1 | \
   vnone12:diff:$trial::-1 | \
   vnone13:diff:$trial::-1 | \
   vnone14:diff:$trial::-1 | \
   vnone15:diff:$trial::-1 | \
   vnone16:diff:$trial::-1 | \
   vnone17:diff:$trial::-1 | \
   vnone18:diff:$trial::-1 | \
   vnone19:diff:$trial::-1 | \
   vnone:diff:$mean:average:1" \
   wine6.trl "$out"
let i++

mpdiag $i \
  "log(difference):botlft | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone00:diff:$trial:trials:0 | \
   Vnone01:diff:$trial::-1 | \
   Vnone02:diff:$trial::-1 | \
   Vnone03:diff:$trial::-1 | \
   Vnone04:diff:$trial::-1 | \
   Vnone05:diff:$trial::-1 | \
   Vnone06:diff:$trial::-1 | \
   Vnone07:diff:$trial::-1 | \
   Vnone08:diff:$trial::-1 | \
   Vnone09:diff:$trial::-1 | \
   Vnone10:diff:$trial::-1 | \
   Vnone11:diff:$trial::-1 | \
   Vnone12:diff:$trial::-1 | \
   Vnone13:diff:$trial::-1 | \
   Vnone14:diff:$trial::-1 | \
   Vnone15:diff:$trial::-1 | \
   Vnone16:diff:$trial::-1 | \
   Vnone17:diff:$trial::-1 | \
   Vnone18:diff:$trial::-1 | \
   Vnone19:diff:$trial::-1 | \
   Vnone:diff:$mean:average:1" \
   wine6.trl "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   e1.2:diff:$blue:1.2/1.5/1.9:1 | \
   e1.5:diff:$blue::-1 | \
   e1.9:diff:$blue::-1 | \
   e2.0:diff:$limit:2.0:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   m0.1:diff:$blue:0.1/0.3/0.6:1 | \
   m0.3:diff:$blue::-1 | \
   m0.6:diff:$blue::-1 | \
   m0.7:diff:$limit:0.7:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   resilient:diff:$green:resilient:2 | \
   quick:diff:$red:quick:3 | \
   adaptive:diff:$blue:adaptive:1" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKe1.2:diff:$blue:1.2/1.5/1.9:1 | \
   vKe1.5:diff:$blue::-1 | \
   vKe1.9:diff:$blue::-1 | \
   vKe2.0:diff:$limit:2.0:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKm0.1:diff:$blue:0.1/0.3/0.8:1 | \
   vKm0.3:diff:$blue::-1 | \
   vKm0.8:diff:$blue::-1 | \
   vKm0.9:diff:$limit:0.9:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKresilient:diff:$green:resilient:2 | \
   vKquick:diff:$red:quick:3 | \
   vKadaptive:diff:$blue:adaptive:1" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   ve1.2:diff:$blue:1.2/1.5/1.9:1 | \
   ve1.5:diff:$blue::-1 | \
   ve1.9:diff:$blue::-1 | \
   ve2.0:diff:$limit:2.0:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   vm0.15:diff:$blue:0.15/0.3/0.8:1 | \
   vm0.3:diff:$blue::-1 | \
   vm0.8:diff:$blue::-1 | \
   vm0.9:diff:$limit:0.9:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   vresilient:diff:$green:resilient:2 | \
   vquick:diff:$red:quick:3 | \
   vadaptive:diff:$blue:adaptive:1" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKe1.2:diff:$blue:1.2/1.5/1.9:1 | \
   VKe1.5:diff:$blue::-1 | \
   VKe1.9:diff:$blue::-1 | \
   VKe2.0:diff:$limit:2.0:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKm0.2:diff:$blue:0.2/0.3/0.7:1 | \
   VKm0.3:diff:$blue::-1 | \
   VKm0.7:diff:$blue::-1 | \
   VKm0.8:diff:$limit:0.8:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKresilient:diff:$green:resilient:2 | \
   VKquick:diff:$red:quick:3 | \
   VKadaptive:diff:$blue:adaptive:1" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Ve1.2:diff:$blue:1.2/1.5/1.9:1 | \
   Ve1.5:diff:$blue::-1 | \
   Ve1.9:diff:$blue::-1 | \
   Ve2.0:diff:$limit:2.0:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Vm0.2:diff:$blue:0.2/0.3/0.8:1 | \
   Vm0.3:diff:$blue::-1 | \
   Vm0.8:diff:$blue::-1 | \
   Vm0.9:diff:$limit:0.9:2" \
   wine6.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Vresilient:diff:$green:resilient:2 | \
   Vquick:diff:$red:quick:3 | \
   Vadaptive:diff:$blue:adaptive:1" \
   wine6.res "$out"
let i++

if [[ $file == "" ]]; then term; fi

echo "done."
fi

#-----------------------------------------------------------------------
# breast
#-----------------------------------------------------------------------

if [[ $data == "all" || $data == "breast" ]]; then
if [[ $file == "" ]]; then start breast.mp; fi
echo -n "processing breast ... "

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none00:diff:$trial:trials:0 | \
   none01:diff:$trial::-1 | \
   none02:diff:$trial::-1 | \
   none03:diff:$trial::-1 | \
   none04:diff:$trial::-1 | \
   none05:diff:$trial::-1 | \
   none06:diff:$trial::-1 | \
   none07:diff:$trial::-1 | \
   none08:diff:$trial::-1 | \
   none09:diff:$trial::-1 | \
   none10:diff:$trial::-1 | \
   none11:diff:$trial::-1 | \
   none12:diff:$trial::-1 | \
   none13:diff:$trial::-1 | \
   none14:diff:$trial::-1 | \
   none15:diff:$trial::-1 | \
   none16:diff:$trial::-1 | \
   none17:diff:$trial::-1 | \
   none18:diff:$trial::-1 | \
   none19:diff:$trial::-1 | \
   none:diff:$mean:average:1" \
   breast.trl "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone00:diff:$trial:trials:0 | \
   vnone01:diff:$trial::-1 | \
   vnone02:diff:$trial::-1 | \
   vnone03:diff:$trial::-1 | \
   vnone04:diff:$trial::-1 | \
   vnone05:diff:$trial::-1 | \
   vnone06:diff:$trial::-1 | \
   vnone07:diff:$trial::-1 | \
   vnone08:diff:$trial::-1 | \
   vnone09:diff:$trial::-1 | \
   vnone10:diff:$trial::-1 | \
   vnone11:diff:$trial::-1 | \
   vnone12:diff:$trial::-1 | \
   vnone13:diff:$trial::-1 | \
   vnone14:diff:$trial::-1 | \
   vnone15:diff:$trial::-1 | \
   vnone16:diff:$trial::-1 | \
   vnone17:diff:$trial::-1 | \
   vnone18:diff:$trial::-1 | \
   vnone19:diff:$trial::-1 | \
   vnone:diff:$mean:average:1" \
   breast.trl "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone00:diff:$trial:trials:0 | \
   Vnone01:diff:$trial::-1 | \
   Vnone02:diff:$trial::-1 | \
   Vnone03:diff:$trial::-1 | \
   Vnone04:diff:$trial::-1 | \
   Vnone05:diff:$trial::-1 | \
   Vnone06:diff:$trial::-1 | \
   Vnone07:diff:$trial::-1 | \
   Vnone08:diff:$trial::-1 | \
   Vnone09:diff:$trial::-1 | \
   Vnone10:diff:$trial::-1 | \
   Vnone11:diff:$trial::-1 | \
   Vnone12:diff:$trial::-1 | \
   Vnone13:diff:$trial::-1 | \
   Vnone14:diff:$trial::-1 | \
   Vnone15:diff:$trial::-1 | \
   Vnone16:diff:$trial::-1 | \
   Vnone17:diff:$trial::-1 | \
   Vnone18:diff:$trial::-1 | \
   Vnone19:diff:$trial::-1 | \
   Vnone:diff:$mean:average:1" \
   breast.trl "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   e1.05:diff:$blue:1.05/1.1/1.2:1 | \
   e1.1:diff:$blue::-1 | \
   e1.2:diff:$blue::-1 | \
   e1.3:diff:$limit:1.3:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   m0.05:diff:$blue:0.05:1 | \
   m0.1:diff:$limit:0.1:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   none:diff:$none:none:0 | \
   resilient:diff:$green:resilient:2 | \
   quick:diff:$red:quick:3 | \
   adaptive:diff:$blue:adaptive:1" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKe1.2:diff:$blue:1.2/1.4/1.6:1 | \
   vKe1.4:diff:$blue::-1 | \
   vKe1.6:diff:$blue::-1 | \
   vKe1.7:diff:$limit:1.7:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKm0.1:diff:$blue:0.1/0.3/0.6:1 | \
   vKm0.3:diff:$blue::-1 | \
   vKm0.6:diff:$blue::-1 | \
   vKm0.7:diff:$limit:0.7:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vKnone:diff:$none:none:0 | \
   vKresilient:diff:$green:resilient:2 | \
   vKquick:diff:$red:quick:3 | \
   vKadaptive:diff:$blue:adaptive:1" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   ve1.1:diff:$blue:1.1/1.3/1.5:1 | \
   ve1.3:diff:$blue::-1 | \
   ve1.5:diff:$blue::-1 | \
   ve1.6:diff:$limit:1.6:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   vm0.1:diff:$blue:0.1/0.15/0.4:1 | \
   vm0.15:diff:$blue::-1 | \
   vm0.4:diff:$blue::-1 | \
   vm0.5:diff:$limit:0.5:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   vnone:diff:$none:none:0 | \
   vresilient:diff:$green:resilient:2 | \
   vquick:diff:$red:quick:3 | \
   vadaptive:diff:$blue:adaptive:1" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKe1.2:diff:$blue:1.2/1.5/1.9:1 | \
   VKe1.5:diff:$blue::-1 | \
   VKe1.9:diff:$blue::-1 | \
   VKe2.0:diff:$limit:2.0:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKm0.1:diff:$blue:0.1/0.3/0.7:1 | \
   VKm0.3:diff:$blue::-1 | \
   VKm0.7:diff:$blue::-1 | \
   VKm0.8:diff:$limit:0.8:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   VKnone:diff:$none:none:0 | \
   VKresilient:diff:$green:resilient:2 | \
   VKquick:diff:$red:quick:3 | \
   VKadaptive:diff:$blue:adaptive:1" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Ve1.2:diff:$blue:1.2/1.5/1.9:1 | \
   Ve1.5:diff:$blue::-1 | \
   Ve1.9:diff:$blue::-1 | \
   Ve2.0:diff:$limit:2.0:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \
   1:0:0:*:*:-9.999:-9.999:*:* | \
   Vnone:diff:$none:none:0 | \
   Vm0.1:diff:$blue:0.1/0.3/0.5:1 | \
   Vm0.3:diff:$blue::-1 | \
   Vm0.5:diff:$blue::-1 | \
   Vm0.6:diff:$limit:0.6:2" \
   breast.res "$out"
let i++

mpdiag $i \
  "log(difference) | \