diff --git a/fr-fr/wolfram-fr.html.markdown b/fr-fr/wolfram-fr.html.markdown
new file mode 100644
index 00000000..d297bd74
--- /dev/null
+++ b/fr-fr/wolfram-fr.html.markdown
@@ -0,0 +1,166 @@
+---
+language: wolfram
+contributors:
+    - ["hyphz", "http://github.com/hyphz/"]
+    - ["altaris", "http://github.com/altaris/"]
+filename: learnwolfram.nb
+---
+
+Le langage Wolfram est utilisé dans les programmes suivants :
+* La ligne de commandes interactive noyau du Raspberry Pi, mais elle ne peut pas
+gérer des éléments graphiques.
+* _Mathematica_, un éditeur de texte riche spécialisé pour les mathématiques :
+appuyer sur `Shift + Entrée` dans une cellule de code crée un nouvelle cellule 
+contenant le résultat.
+* _Wolfram Wokbench_, une variante d'Eclipse spécialisée pour le langage
+Wolfram.
+
+Ce code d'exemple peut être utilisé et modifié dans ces logiciels. Cependant, le
+copier-coller directement dans Mathematica peut causer des problèmes de
+formatage, car il ne contient aucune information de mise en page.
+
+```
+(* Ceci est un commentaire *)
+
+(* Dans Mathematica, au lieu d'utiliser ces commentaires, vous pouvez créer des
+   cellules de texte et insérer de jolies images *)
+
+(* Saisissez une opération et appuyez sur Shift + Entrée pour obtenir le
+   résultat *)
+2*2              (* 4 *)
+5+8              (* 13 *)
+
+(* Appels de fonction *)
+(* Le langage Wolfram est sensible à la casse *)
+Sin[Pi/2]        (* 1 *)
+
+(* Syntaxe alternative pour les appels de fonction à 1 paramètre *)
+Sin@(Pi/2)       (* 1 *)
+(Pi/2) // Sin    (* 1 *)
+
+(* Dans le langage Wolfram, toutes les expressions sont en réalité des appels de
+   fonction *)
+Times[2, 2]      (* 4 *)
+Plus[5, 8]       (* 13 *)
+
+(* Utiliser une variable pour la première fois la déclare globalement *)
+x = 5            (* 5 *)
+x == 5           (* True, l'assignation et le test d'égalité est écrit comme
+                    dans le C *)
+x                (* 5 *)
+x = x + 5        (* 10 *)
+x                (* 10 *)
+Set[x, 20]       (* TOUT est un appel de fonction, TOUUUUUUUUT *)
+x                (* 20 *)
+
+(* Le langage Wolfram effectue des manipulations symboliques, donc utiliser des
+   variables non déclarées n'est pas illégal *)
+cow + 5          (* 5 + cow, comme cow n'est pas déclarée, l'évaluation
+                    s'arrête là *)
+cow + 5 + 10     (* 15 + cow, on évalue ce qu'on peut... *)
+%                (* 15 + cow, % représente le dernier résultat *)
+% - cow          (* 15, les variables non déclarées peuvent quand même
+                    s'annuler *)
+moo = cow + 5    (* Attention : moo est ici une expression et non un nombre *)
+
+(* Déclaration d'une fonction *)
+Double[x_] := x * 2    (* Le symbole := empêche l'évaluation immédiate du terme
+                          à droite *)
+Double[10]             (* 20 *)
+Double[Sin[Pi/2]]      (* 2 *)
+Double @ Sin @ (Pi/2)  (* 2, Utiliser @ évite les paquets de crochets
+                            fermants si moches *)
+(Pi/2) // Sin // Double(* 2, Utiliser // permet d'écrire les fonctions dans
+                             l'ordre d'appel *)
+
+(* Pour la programmation impérative, utiliser ; pour séparer les expressions *)
+MyFirst[] := (Print@"Hello"; Print@"World")  (* Les parenthèses sont nécessaires
+                                                car ; est prioritaire sur := *)
+MyFirst[]                                    (* Hello World *)
+
+(* Boucles For à la C *)
+PrintTo[x_] := For[y=0, y<x, y++, (Print[y])]  (* L'évaluation des boucles For
+                                                  se fait comme dans le C *)
+PrintTo[5]                                     (* 0 1 2 3 4 *)
+
+(* Boucles While *)
+x = 0; While[x < 2, (Print@x; x++)]     (* De nouveau, comme dans le C *)
+
+(* Expressions conditionnelles et If *)
+x = 8; If[x==8, Print@"Yes", Print@"No"]   (* If [condition, si vrai,
+                                              si faux] *)
+Switch[x, 2, Print@"Two", 8, Print@"Yes"]  (* Switch par valeur *)
+Which[x==2, Print@"No", x==8, Print@"Yes"] (* Switch du type if, else if,
+                                              else if, ..., else *)
+
+(* Les variables autres que les paramètres de fonctions sont par défaut
+   globales, même à l'intérieur des fonctions *)
+y = 10             (* 10, y est une variable globale *)
+PrintTo[5]         (* 0 1 2 3 4 *)
+y                  (* 5, y a été modifiée par PrintTo *)
+x = 20             (* 20, x est une variable globale *)
+PrintTo[5]         (* 0 1 2 3 4 *)
+x                  (* 20, dans PrintTo, le paramètre x masque la variable
+                      globale x *)
+
+(* La fonction Module permet d'utiliser des variables locales *)
+BetterPrintTo[x_] := Module[{y}, (For[y=0, y<x, y++, (Print@y)])]
+y = 20             (* y est une variable globale *)
+BetterPrintTo[5]   (* 0 1 2 3 4 *)
+y                  (* 20, y n'a pas été modifiée car le y du Module masque le
+                          y global. C'est bien mieux comme ca ! *)
+
+(* Module permet de faire des déclarations globales aussi *)
+Module[{count}, count=0;        (* count est une variable locale *)
+  (IncCount[] := ++count);      (* Ce module déclare des fonctions, mais elles
+                                   ne sont globales. Elles ont cependant accès
+                                   aux variables locales au module. *)
+  (DecCount[] := --count)]
+count              (* count, car il n'y a pas de variable globale nommée
+                      count *)
+IncCount[]         (* 1, la fonction utilise la variable count du module *)
+IncCount[]         (* 2, le précédent appel de IncCount a modifié count *)
+DecCount[]         (* 1 *)
+count              (* count, car il n'existe toujours pas de variable globale
+                      nommé count *)
+
+(* Listes *)
+myList = {1, 2, 3, 4}     (* {1, 2, 3, 4} *)
+myList[[1]]               (* 1, les indexes commencent à 1 et non 0 !!! *)
+Map[Double, myList]       (* {2, 4, 6, 8}, appliquer une fonction à une liste de
+                             manière fonctionnelle *)
+Double /@ myList          (* {2, 4, 6, 8}, syntaxe abrégée de la ligne
+                             précédente *)
+Scan[Print, myList]       (* 1 2 3 4, boucle impérative sur une liste *)
+Fold[Plus, 0, myList]     (* 10 (0+1+2+3+4) *)
+FoldList[Plus, 0, myList] (* {0, 1, 3, 6, 10}, variante de la fonction
+                             précédente qui donne aussi les résultats
+                             intermédiaires *)
+Append[myList, 5]         (* {1, 2, 3, 4, 5}, myList n'est pas modifiée... *)
+Prepend[myList, 5]        (* {5, 1, 2, 3, 4}, ... mais elle peut l'être en 
+                             écrivant "myList = " *)
+Join[myList, {3, 4}]      (* {1, 2, 3, 4, 3, 4} *)
+myList[[2]] = 5           (* {1, 5, 3, 4}, ceci modifie bien la liste *)
+
+(* Tables associatives, ou dictionnaires *)
+myHash = <|"Green" -> 2, "Red" -> 1|>   (* Crée une table associative *)
+myHash[["Green"]]                       (* 2, l'utilise *)
+myHash[["Green"]] := 5                  (* 5, la modifie *)
+myHash[["Puce"]] := 3.5                 (* 3.5, l'étend *)
+KeyDropFrom[myHash, "Green"]            (* Supprime la clé "Green" *)
+Keys[myHash]                            (* {Red} *)
+Values[myHash]                          (* {1} *)
+
+(* Pour finir, toute bonne démonstration du langage Wolfram contient un
+   Manipulate ! *)
+Manipulate[y^2, {y, 0, 20}] (* Crée une interface graphique interactive qui
+                               affiche y^2, permettant à l'utilisateur de
+                               modifier la valeur de y grâce à un contrôle
+                               allant de 0 à 20. Ne fonctionne que si le
+                               logiciel utilisé gère les éléments graphique. *)
+```
+
+## Envie d'aller plus loin ?
+
+* [Documentation du langage Wolfram (en anglais)]
+(http://reference.wolfram.com/language/)
\ No newline at end of file