diff --git a/BloubWorld/movebloubs.f90 b/BloubWorld/movebloubs.f90
index 10ebb5f..be66b9e 100644
--- a/BloubWorld/movebloubs.f90
+++ b/BloubWorld/movebloubs.f90
@@ -110,7 +110,7 @@ contains
     bloub%alive = .TRUE.
     call random_pv(bloub)
     bloub%radius = wtf
-    bloub%seq    = foo
+    bloub%age   = foo
     ! call display_bloub (bloub, "new bloub")
     write(un) bloub              ! no error control ?