diff --git a/randomwalk.f90 b/randomwalk.f90
index c3f123c..d08aa8a 100644
--- a/randomwalk.f90
+++ b/randomwalk.f90
@@ -24,7 +24,6 @@ subroutine do_randomwalk(nbre, col)
   real                        :: px, py, px2, py2
 
   px = 0.0        ;       py = 0.0
-  call genp_move(px, py)
   do idx=1, nbre
     px2 = px + rand(0) - 0.50
     py2 = py + rand(0) - 0.50