From 355d61df23ff45b0f7046bf026af15c82eefea4f Mon Sep 17 00:00:00 2001
From: tth <tth@konrad.lan>
Date: Wed, 16 Feb 2022 17:10:36 +0100
Subject: [PATCH] oups!

---
 BloubWorld/movebloubs.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 ?