1 files changed, 11 insertions, 0 deletions
diff --git a/src/main/scala/reading/models/Grade.scala b/src/main/scala/reading/models/Grade.scala
index f54211d..c711e8b 100644
--- a/src/main/scala/reading/models/Grade.scala
+++ b/src/main/scala/reading/models/Grade.scala
@@ -24,4 +24,15 @@ object Grade extends Enum[Grade] {
   case object Cinquieme extends Grade
   case object Quatrieme extends Grade
   case object Troisieme extends Grade
+
+  def from(program: Program): Grade = {
+    import Program._
+
+    program match {
+      case Monstre | RecitAventure | CreationPoetique | Resister => Sixieme
+      case VoyageEtAventure | Autrui | UniversNouveaux | Heros | HommeEtNature => Cinquieme
+      case DireAmour | Valeurs | Reel | Informer | Ville => Quatrieme
+      case SeRaconter | TraversSociete | VisionsPoetiques | Agir | ProgresReveScientifique => Troisieme
+    }
+  }
 }