diff --git a/misc/minicern/src/kernlib.f b/misc/minicern/src/kernlib.f
index 6966d32197d62edc2c05b84cf40959c88376ff7c..7667f0c6990a5626068d439f24178a017f3e4270 100644
--- a/misc/minicern/src/kernlib.f
+++ b/misc/minicern/src/kernlib.f
@@ -56,8 +56,10 @@
 
       SUBROUTINE UBUNCH (MS,MT,NCHP)
       DIMENSION MS(99), MT(99), NCHP(9)
-      data iblan1/x'20202020'/
-      data mask1/x'000000ff'/
+*      data iblan1/x'20202020'/
+*      data mask1/x'000000ff'/
+      data iblan1/538976288/
+      data mask1/255/
       NCH = NCHP(1)
       IF (NCH) 91,39,11
    11 NWT = ISHFT (NCH,-2)