From cb9ba14d80feba3f5efa05fbff2c9d924119a1b4 Mon Sep 17 00:00:00 2001 From: Andreas Adelmann Date: Fri, 29 Sep 2006 04:26:29 +0000 Subject: [PATCH] delcared IARGC --- test/H5BlockParTestScalarFieldF.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/test/H5BlockParTestScalarFieldF.f90 b/test/H5BlockParTestScalarFieldF.f90 index 31efc8b..d02bf8f 100644 --- a/test/H5BlockParTestScalarFieldF.f90 +++ b/test/H5BlockParTestScalarFieldF.f90 @@ -25,6 +25,8 @@ PROGRAM H5BlockParTestScalarFieldF INTEGER*8 :: layout32 (6,32) INTEGER*8 :: layout32g(6,32) + INTEGER*8 :: IARGC + DATA layout1 / 1,64, 1,64, 1,512 / DATA layout8 / 1,64, 1,64, 1, 64, & 1,64, 1,64, 65,128, &