diff --git a/quad10/fenomens/lab/p4/MC-2.f90 b/quad10/fenomens/lab/p4/MC-2.f90
index ccc2941..0a999b8 100644
--- a/quad10/fenomens/lab/p4/MC-2.f90
+++ b/quad10/fenomens/lab/p4/MC-2.f90
@@ -18,6 +18,15 @@
   integer*2 :: S(1:128, 1:128)
 
   ! Inicialitzem algunes variables sobre el problema, que es passen al programa amb un namelist
+  ! L: Mida del sistema
+  ! NOM: Prefix dels noms dels fitxers on es desaran les dades.
+  ! TEMP: Temperatura reduïda per la simulació.
+  ! NSEED: Nombres de seeds que es simularan.
+  ! SEED0: Nombre de la seed inicial.
+  ! MCTOT: Nombre d'iteracions Montecarlo que es faran per cada llavor.
+  ! MCD: Cada cuantes iteracions Montecarlo s'han d'enregistrar les magnituds.
+  ! SAVEFINALCONF: Si s'ha de desar un fitxer amb la configuració final.
+  ! SAVEEVOLUTION: Si s'ha de desar un fitxer amb l'evolució temporal de les magnituds.
   namelist /DADES/ L, NOM, TEMP, NSEED, SEED0, MCTOT, MCINI, MCD, SAVEFINALCONF, SAVEEVOLUTION
   read(nml = DADES, unit = 5)
 
@@ -42,7 +51,7 @@
   SUMAM = 0
   SUMM2 = 0
 
-  ! Si s'ha especificat de guardar l'evolució temporal, obrim el fitxer on la guardarem
+  ! Si s'ha especificat de desar l'evolució temporal, obrim el fitxer on la desarem
   if (SAVEEVOLUTION) then
     open(12, file = "data_out/" // trim(NOM) // ".ev")
   endif