27        SUBROUTINE MPI_SIZEOF_I( X, SIZE, IERROR )  argument
29        INTEGER SIZE, IERROR  local
31        IERROR = 0
34        SUBROUTINE MPI_SIZEOF_R( X, SIZE, IERROR )  argument
36        INTEGER SIZE, IERROR  local
38        IERROR = 0
45 @REQD@       SUBROUTINE MPI_SIZEOF_D( X, SIZE, IERROR )  argument
47 @REQD@       INTEGER SIZE, IERROR
49 @REQD@       IERROR = 0
52        SUBROUTINE MPI_SIZEOF_L( X, SIZE, IERROR )
54        INTEGER SIZE, IERROR
56        IERROR = 0
59        SUBROUTINE MPI_SIZEOF_CH( X, SIZE, IERROR )  argument
61        INTEGER SIZE, IERROR  local
63        IERROR = 0
66        SUBROUTINE MPI_SIZEOF_CX( X, SIZE, IERROR )  argument
68        INTEGER SIZE, IERROR  local
70        IERROR = 0
73        SUBROUTINE MPI_SIZEOF_IV( X, SIZE, IERROR )  argument
75        INTEGER SIZE, IERROR  local
77        IERROR = 0
80        SUBROUTINE MPI_SIZEOF_RV( X, SIZE, IERROR )  argument
82        INTEGER SIZE, IERROR  local
84        IERROR = 0
91 @REQD@       SUBROUTINE MPI_SIZEOF_DV( X, SIZE, IERROR )
93 @REQD@       INTEGER SIZE, IERROR
95 @REQD@       IERROR = 0
98        SUBROUTINE MPI_SIZEOF_LV( X, SIZE, IERROR )  argument
100        INTEGER SIZE, IERROR  local
102        IERROR = 0
105        SUBROUTINE MPI_SIZEOF_CHV( X, SIZE, IERROR )  argument
107        INTEGER SIZE, IERROR  local
109        IERROR = 0
112        SUBROUTINE MPI_SIZEOF_CXV( X, SIZE, IERROR )  argument
114        INTEGER SIZE, IERROR  local
116        IERROR = 0
122 @REQI8@       SUBROUTINE MPI_SIZEOF_I8( X, SIZE, IERROR )
124 @REQI8@       INTEGER SIZE, IERROR
126 @REQI8@       IERROR = 0
128 @REQI8@       SUBROUTINE MPI_SIZEOF_I8V( X, SIZE, IERROR )
130 @REQI8@       INTEGER SIZE, IERROR
132 @REQI8@       IERROR = 0
135 @REQI1@       SUBROUTINE MPI_SIZEOF_I1( X, SIZE, IERROR )
137 @REQI1@       INTEGER SIZE, IERROR
139 @REQI1@       IERROR = 0
141 @REQI1@       SUBROUTINE MPI_SIZEOF_I1V( X, SIZE, IERROR )
143 @REQI1@       INTEGER SIZE, IERROR
145 @REQI1@       IERROR = 0
148 @REQI2@       SUBROUTINE MPI_SIZEOF_I2( X, SIZE, IERROR )
150 @REQI2@       INTEGER SIZE, IERROR
152 @REQI2@       IERROR = 0
154 @REQI2@       SUBROUTINE MPI_SIZEOF_I2V( X, SIZE, IERROR )
156 @REQI2@       INTEGER SIZE, IERROR
158 @REQI2@       IERROR = 0