1       INTEGER ::    IA0000, IA0X00, IA0Y00, IA0Z00,                     &
2      &              IAXX00, IAXY00, IAXZ00, IAYY00,                     &
3      &              IAYZ00, IAZZ00, IA000X, IA000Y,                     &
4      &              IA000Z, IA00XX, IA00XY, IA00XZ,                     &
5      &              IA00YY, IA00YZ, IA00ZZ, IA0X0X,                     &
6      &              IA0X0Y, IA0X0Z, IA0Y0X, IA0Y0Y,                     &
7      &              IA0Y0Z, IA0Z0X, IA0Z0Y, IA0Z0Z
8 
9       COMMON /ADER/ IA0000, IA0X00, IA0Y00, IA0Z00,                     &
10      &              IAXX00, IAXY00, IAXZ00, IAYY00,                     &
11      &              IAYZ00, IAZZ00, IA000X, IA000Y,                     &
12      &              IA000Z, IA00XX, IA00XY, IA00XZ,                     &
13      &              IA00YY, IA00YZ, IA00ZZ, IA0X0X,                     &
14      &              IA0X0Y, IA0X0Z, IA0Y0X, IA0Y0Y,                     &
15      &              IA0Y0Z, IA0Z0X, IA0Z0Y, IA0Z0Z
16