1- Copiar y pegar archivos Principal.f, Aleatorios.f y General.f en esta carpeta.
2- Quitar todo lo que sobre de Principal.f, dejando únicamente un bucle que imprima el contador y las líneas de paralelizado. Dejar el bucle de 1 a 10.
3- Borrar contenido de General.f, dejando únicamente las variables k, Nrep, e ierr (para el paralelizado).
4- Copiar y pegar archivos rrp y sp.
5- Editar archivo sp para que compile General.f Aleatorios.f Principal.f (cuidado orden).
6- Compilar.
7- Crear carpeta running.
8- Editar rrp para que corra en running con 32 procesos.
9- Ver salida.
10- Cambiar línea if(k.eq.0) write(*,*) i por write(*,*) i,k.
11- Compilar, ejecutar y visualizar salida (CEV).
12- Volver la línea if(k.eq.0) write(*,*) i a su estado original y volver a compilar.
13- Agregar la línea Call Inicializar_Azar en procedimientos
13- Copiar y pegar Procedimientos.f y vaciar excepto encabezado.
14- Crear una función MonteCarlo que devuelva uno o cero, en función del criterio de Monte Carlo utilizando la función Ranf() -> 0,1
15- agregar la línea cont=cont+MonteCarlo()
16- agregar la variable real pi y calcular pi luego del bucle
16- Cambiar línea if(k.eq.0) write(*,*) i por if(k.eq.0) write(*,*) i, pi y ubicarla fuera del bucle, luego de calcular pi
17- CEV y Arreglar problema de ejecución (falta archivo azar).
18- CEV.
19- Agregar variable nloop y dejar bucle de 1 a nloop (arreglar cálculo de pi).
20- Hacer loop tan grande cómo se pueda.
21- CEV.
22- Cambiar azar para obtener una salida diferente.
23- Cambiar subrutina Inicializar_Azar para obtener siempre salidas diferentes.
24- Agregar if(k.eq.1) write(*,*) i, pi
25- CEV.
26- Agregar loop que imprima lo que ha hecho cada proceso
27- CEV.
28- Definir en General.f a las variables enteras nloop,cont,cont_t(32)
29- Agregar subrutina Gather en Procedimientos.f y hacer uso de ella para calcular el promedio y la desviación estandar (Gather se encuentra en Imprimir.f)
30- 
29- CVE.
30- Fin.

