diff --git a/sources/evolution.F90 b/sources/evolution.F90
index 4751661..1728a10 100644
--- a/sources/evolution.F90
+++ b/sources/evolution.F90
@@ -1205,7 +1205,7 @@ module evolution
     m    = 1
     n    = get_dblocks()
 
-!$omp parallel do default(shared) private(pdata,cm)
+!$omp parallel do default(shared) private(pdata,um,cm)
     do l = 1, n
       pdata => data_blocks(l)%ptr
 
@@ -1425,7 +1425,7 @@ module evolution
     m    = 1
     n    = get_dblocks()
 
-!$omp parallel do default(shared) private(pdata,cm)
+!$omp parallel do default(shared) private(pdata,um,cm)
     do l = 1, n
       pdata => data_blocks(l)%ptr