Initial commit

build.sbt

+organization := "ch.hepia"
+
+name := "tpscala"
+
+version := "2018"
+
+scalaVersion := "2.12.6"
+
+libraryDependencies ++= Seq(
+  "org.scalatest" %% "scalatest" % "3.0.5" % "test"
+)
+
+fork in run := true
+
+javaOptions in run += "-Xmx2G"
+
+
+scalacOptions ++= Seq(
+  "-deprecation",                      // Emit warning and location for usages of deprecated APIs.
+  "-encoding", "utf-8",                // Specify character encoding used by source files.
+  "-explaintypes",                     // Explain type errors in more detail.
+  "-feature",                          // Emit warning and location for usages of features that should be imported explicitly.
+  "-language:existentials",            // Existential types (besides wildcard types) can be written and inferred
+  "-language:higherKinds",             // Allow higher-kinded types
+  "-unchecked",                        // Enable additional warnings where generated code depends on assumptions.
+  "-Xcheckinit",                       // Wrap field accessors to throw an exception on uninitialized access.
+  "-Xfatal-warnings",                  // Fail the compilation if there are any warnings.
+  "-Xlint:adapted-args",               // Warn if an argument list is modified to match the receiver.
+  "-Xlint:by-name-right-associative",  // By-name parameter of right associative operator.
+  "-Xlint:constant",                   // Evaluation of a constant arithmetic expression results in an error.
+  "-Xlint:delayedinit-select",         // Selecting member of DelayedInit.
+  "-Xlint:doc-detached",               // A Scaladoc comment appears to be detached from its element.
+  "-Xlint:inaccessible",               // Warn about inaccessible types in method signatures.
+  "-Xlint:infer-any",                  // Warn when a type argument is inferred to be `Any`.
+  "-Xlint:missing-interpolator",       // A string literal appears to be missing an interpolator id.
+  "-Xlint:nullary-override",           // Warn when non-nullary `def f()' overrides nullary `def f'.
+  "-Xlint:nullary-unit",               // Warn when nullary methods return Unit.
+  "-Xlint:option-implicit",            // Option.apply used implicit view.
+  "-Xlint:package-object-classes",     // Class or object defined in package object.
+  "-Xlint:poly-implicit-overload",     // Parameterized overloaded implicit methods are not visible as view bounds.
+  "-Xlint:private-shadow",             // A private field (or class parameter) shadows a superclass field.
+  "-Xlint:stars-align",                // Pattern sequence wildcard must align with sequence component.
+  "-Xlint:type-parameter-shadow",      // A local type parameter shadows a type already in scope.
+  "-Xlint:unsound-match",              // Pattern match may not be typesafe.
+  "-Yno-adapted-args",                 // Do not adapt an argument list (either by inserting () or creating a tuple) to match the receiver.
+  "-Ypartial-unification",             // Enable partial unification in type constructor inference
+  "-Ywarn-dead-code",                  // Warn when dead code is identified.
+  "-Ywarn-extra-implicit",             // Warn when more than one implicit parameter section is defined.
+  "-Ywarn-inaccessible",               // Warn about inaccessible types in method signatures.
+  "-Ywarn-infer-any",                  // Warn when a type argument is inferred to be `Any`.
+  "-Ywarn-nullary-override",           // Warn when non-nullary `def f()' overrides nullary `def f'.
+  "-Ywarn-nullary-unit",               // Warn when nullary methods return Unit.
+  "-Ywarn-numeric-widen",              // Warn when numerics are widened.
+  "-Ywarn-unused:implicits",           // Warn if an implicit parameter is unused.
+  "-Ywarn-unused:imports",             // Warn if an import selector is not referenced.
+  "-Ywarn-unused:locals",              // Warn if a local definition is unused.
+  "-Ywarn-unused:params",              // Warn if a value parameter is unused.
+  "-Ywarn-unused:patvars",             // Warn if a variable bound in a pattern is unused.
+  "-Ywarn-unused:privates",            // Warn if a private member is unused.
+  "-Ywarn-value-discard"               // Warn when non-Unit expression results are unused.
+)
+
+scalacOptions in (Compile, console) --= Seq("-Ywarn-unused:imports", "-Xfatal-warnings")
+
+
+
+scalaSource in Compile := baseDirectory.value / "src"
+
+javaSource in Compile := baseDirectory.value / "java" / "src" 
+
+scalaSource in Test := baseDirectory.value / "test"
+
+    

src/collect.scala

+package ch.hepia.tpscala
+
+
+/* Implémentez les fonctions suivantes. 
+ */
+object Collect {
+
+  case class Album( title: String, artist: String, year: Int )
+  case class Duration( minutes: Int, seconds: Int )
+  case class Track( title: String, duration: Duration )
+
+  val albums = List(
+    Album( "Mit Gas", "Tomahawk", 2003 ),
+    Album( "Pork Soda", "Primus", 1993 ),
+    Album( "Brown Album", "Primus", 1997 ),
+    Album( "Distraction Pieces", "Scroobius Pip", 2011 )
+  )
+
+  val tracks = Map(
+    "Mit Gas" -> List(
+      Track( "Mayday", Duration( 3, 32 ) )
+    ),
+    "Pork Soda" -> List(
+      Track( "DMV", Duration( 4, 58 ) ),
+      Track( "Mr. Krinkle", Duration( 5, 27 ) )
+    ),
+    "Brown Album" -> List(
+      Track( "Fisticuffs", Duration( 4, 25 ) ),
+      Track( "Camelback Cinema", Duration( 4, 0 ) ),
+      Track( "Kalamazoo", Duration( 3, 31 ) )
+    ),
+    "Distraction Pieces" -> List(
+      Track( "Let 'Em Come", Duration( 4, 25 ) ),
+      Track( "Domestic Silence", Duration( 3, 58 ) )
+    )
+  )
+
+  /* Retourne la liste de morceaux associés à un artiste */
+  def tracksOf( artist: String ): List[Track] = Nil
+
+  /* Retourne la liste de tous les morceaux de moins de 4 minutes */
+  def shortTracks: List[Track] = Nil
+
+  /* Retourne les titres des morceaux antérieurs à une année */
+  def titlesBefore( year: Int ): List[String] = Nil
+
+  /* Calcule la durée totale de tous les morceaux disponibles.
+     REMARQUE: ont veut que les secondes soient inférieures à 60 mais les
+     minutes peuvent dépasser ce total.
+   */
+  def totalDuration: Duration = Duration( 0, 0 )
+
+
+}

test/collect_test.scala

+package ch.hepia.tpscala
+
+import org.scalatest.FunSuite
+
+import Collect._
+
+class Collect6Suite extends FunSuite {
+
+  test( "tracksOf" ) {
+    assert( tracksOf("Justin Bieber").isEmpty )
+    assert( tracksOf("Tomahawk") == List( Track( "Mayday", Duration( 3, 32 ) ) ) )
+    assert( tracksOf("Primus").size == 5 )
+  }
+
+  test( "shortTracks" ) {
+    assert(
+      shortTracks.toSet == Set(
+        Track( "Mayday", Duration( 3, 32 ) ),
+        Track( "Kalamazoo", Duration( 3, 31 ) ),
+        Track( "Domestic Silence", Duration( 3, 58 ) )
+      )
+    )
+  }
+
+  test( "titlesBefore" ) {
+    assert( titlesBefore( 1928 ).size == 0 )
+    assert( titlesBefore( 2020 ).size == 8 )
+    assert(
+      titlesBefore( 2000 ).toSet == Set(
+        "DMV",
+        "Mr. Krinkle",
+        "Fisticuffs",
+        "Camelback Cinema",
+        "Kalamazoo"
+      )
+    )
+  }
+
+  test( "totalDuration" ) {
+    assert( totalDuration == Duration( 34, 16 ) )
+  }
+
+
+
+}