main_testing2/danube_test.sh
changeset 379 5616b45d656f
parent 376 6cc36d0ef79e
child 384 6e1237691307
--- a/main_testing2/danube_test.sh	Sat Nov 28 15:58:36 2020 +0000
+++ b/main_testing2/danube_test.sh	Mon Nov 30 00:06:15 2020 +0000
@@ -173,3 +173,21 @@
   fi
 fi
 
+### danube most_recommended
+
+if [ $tsts -eq 0 ]
+then
+  echo -e  "  val ratings_map2 =  for ((k, v) <- ratings_map) yield (k, v.take(2)) " >> $out
+  echo -e  "  most_recommended(ratings_map2, movies_map).take(3) == " >> $out
+  echo -e  "      List((\"M*A*S*H (a.k.a. MASH) (1970)\",15), " >> $out 
+  echo -e  "           (\"Star Trek: First Contact (1996)\",10), " >> $out
+  echo -e  "           (\"Inception (2010)\",9))) " >> $out
+
+  if (scala_assert "danube.scala" "danube_test7.scala") 
+  then
+    echo -e  "  --> success" >> $out
+  else
+    echo -e  "  --> ONE OF THE TESTS FAILED\n" >>  $out
+  fi
+fi
+