28        SUBROUTINE MPI_SIZEOF_I( X, SIZE, IERROR )  argument
30        INTEGER SIZE, IERROR  local
32        IERROR = 0
35        SUBROUTINE MPI_SIZEOF_R( X, SIZE, IERROR )  argument
37        INTEGER SIZE, IERROR  local
39        IERROR = 0
46 @REQD@       SUBROUTINE MPI_SIZEOF_D( X, SIZE, IERROR )  argument
48 @REQD@       INTEGER SIZE, IERROR
50 @REQD@       IERROR = 0
53        SUBROUTINE MPI_SIZEOF_L( X, SIZE, IERROR )
55        INTEGER SIZE, IERROR
57        IERROR = 0
60        SUBROUTINE MPI_SIZEOF_CH( X, SIZE, IERROR )  argument
62        INTEGER SIZE, IERROR  local
64        IERROR = 0
67        SUBROUTINE MPI_SIZEOF_CX( X, SIZE, IERROR )  argument
69        INTEGER SIZE, IERROR  local
71        IERROR = 0
74        SUBROUTINE MPI_SIZEOF_IV( X, SIZE, IERROR )  argument
76        INTEGER SIZE, IERROR  local
78        IERROR = 0
81        SUBROUTINE MPI_SIZEOF_RV( X, SIZE, IERROR )  argument
83        INTEGER SIZE, IERROR  local
85        IERROR = 0
92 @REQD@       SUBROUTINE MPI_SIZEOF_DV( X, SIZE, IERROR )
94 @REQD@       INTEGER SIZE, IERROR
96 @REQD@       IERROR = 0
99        SUBROUTINE MPI_SIZEOF_LV( X, SIZE, IERROR )  argument
101        INTEGER SIZE, IERROR  local
103        IERROR = 0
106        SUBROUTINE MPI_SIZEOF_CHV( X, SIZE, IERROR )  argument
108        INTEGER SIZE, IERROR  local
110        IERROR = 0
113        SUBROUTINE MPI_SIZEOF_CXV( X, SIZE, IERROR )  argument
115        INTEGER SIZE, IERROR  local
117        IERROR = 0
123 @REQI8@       SUBROUTINE MPI_SIZEOF_I8( X, SIZE, IERROR )
125 @REQI8@       INTEGER SIZE, IERROR
127 @REQI8@       IERROR = 0
129 @REQI8@       SUBROUTINE MPI_SIZEOF_I8V( X, SIZE, IERROR )
131 @REQI8@       INTEGER SIZE, IERROR
133 @REQI8@       IERROR = 0
136 @REQI1@       SUBROUTINE MPI_SIZEOF_I1( X, SIZE, IERROR )
138 @REQI1@       INTEGER SIZE, IERROR
140 @REQI1@       IERROR = 0
142 @REQI1@       SUBROUTINE MPI_SIZEOF_I1V( X, SIZE, IERROR )
144 @REQI1@       INTEGER SIZE, IERROR
146 @REQI1@       IERROR = 0
149 @REQI2@       SUBROUTINE MPI_SIZEOF_I2( X, SIZE, IERROR )
151 @REQI2@       INTEGER SIZE, IERROR
153 @REQI2@       IERROR = 0
155 @REQI2@       SUBROUTINE MPI_SIZEOF_I2V( X, SIZE, IERROR )
157 @REQI2@       INTEGER SIZE, IERROR
159 @REQI2@       IERROR = 0