From 2640a62b922d033a8f537cc0cbf8bca70356134c Mon Sep 17 00:00:00 2001
From: g7fernandes <gafernandesil@gmail.com>
Date: Tue, 14 Jan 2020 17:45:59 -0300
Subject: [PATCH] comments

---
 linkedlist.f90 | 1 -
 randnormal.f90 | 4 ++--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/linkedlist.f90 b/linkedlist.f90
index 4c033af..bc48999 100644
--- a/linkedlist.f90
+++ b/linkedlist.f90
@@ -158,5 +158,4 @@ end function list_get
 !     logical :: a
 !     if 
     
-    
 end module linkedlist
diff --git a/randnormal.f90 b/randnormal.f90
index f339485..b280f13 100644
--- a/randnormal.f90
+++ b/randnormal.f90
@@ -12,7 +12,7 @@ function GaussDeviate()
         
         if (.not. iset) then
             do while (r >= 1)
-            ! gerar números aleatórios entre -1 e 1
+            ! Generate random numbers between -1 e 1
                 call random_seed()
                 call random_number(a1)
                 call random_number(a2)
@@ -20,7 +20,7 @@ function GaussDeviate()
                 a2 = 2*a2-1
                 r = a1**2 + a2**2
             end do
-            s = sqrt(-2*log(r)/r) !transformação polar
+            s = sqrt(-2*log(r)/r) ! polar transformation
             b1 = a1*s
             b2 = a2*s
             iset = .true.