From: rreddy@psc.edu (Raghu Reddy)
Newsgroups: comp.parallel.mpi
Subject: MPI_Type_extent - Is this not an appropriate use? - completed_c.c
    (1/1)
Date: Wed, 24 Feb 1999 22:26:13 GMT
Organization: Pittsburgh Supercomputing Center
Message-Id: <36d47c85.1591265689@mail.psc.edu>
Xref: ukc comp.parallel.mpi:4670


begin 644 completed_c.c
M+RH@+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2T-"B`J($-O9&4Z("`@8V]M
M<&QE=&5D+F,-"B`J($QA8CH@("`@35!)($1E<FEV960@1&%T871Y<&5S#0H@
M*B`@("`@("`@(%1H:7,@<')O9W)A;2!S96YD<R!C;VYT:6=U;W5S(&1A=&$@
M;V8@;6EX960@='EP92`H82!#('-T<G5C="D-"B`J("`@("`@("`@9G)O;2!O
M;F4@<')O8V5S<R!T;R!A;F]T:&5R+B`@270@<VAO=W,@:&]W('1O('5S90T*
M("H@("`@("`@("!T:&4@<W1R=6-T(&1E<FEV960@9&%T871Y<&4N#0H@*@T*
M("H@57-A9V4Z("!C;VUP;&5T960-"B`J("`@("`@("`@4G5N<R!O;B!T=V\@
M;F]D97,N#0H@*B!!=71H;W(Z($UI:V4@2&%M;6EL;"`@3&%S="!R979I<V5D
M.B`R+SDO.38@35=(#0H@*@T*("HM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2T-"B`J("`@("`@("`@4V]M92!C:&%N9V5S(&)Y(%(N(%)E9&1Y+"!04T,@
M,B\R-"\Y.2`H5&AE(&-H86YG97,-"B`J("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@87)E('1H92!P<F]B;&5M(0T*
M("H@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("!4:&4@8VAA;F=E('=A<R!T;R!R97!L86-E#0H@*B`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@($U025])3E0@
M8GD@35!)7T9,3T%4#0H@*B`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@(&EN('1H92!C86QL('1O#0H@*B`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@($U025]4
M>7!E7V5X=&5N="D-"B`J#0H@*B`@("`@("`@($D@;75S="!A9&0@=&AA="!T
M:&4@8V]D92!A<R!P<F]I=F5D(&)Y($UI:V4@2&%M;6EL;"!W87,@=V]R:VEN
M9PT*("H@("`@("`@("!C;W)R96-T;'D@8F5F;W)E($D@8VAA;F=E9"!I="X@
M($)U="!I;G1U=&EV96QY('1H:7,@8VAA;F=E#0H@*B`@("`@("`@('-E96UE
M9"!T;R!M86ME(&UO<F4@<V5N<V4L(&)U="!T:&ES(&1O97,@;F]T('=O<FLA
M#0H@*@T*("HM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2T-"B`J#0H@*B!2
M=6X@=&AI<R!P<F]G<F%M(&]N(&$@5#-%(&%S(&9O;&QO=W,Z#0H@*@T*("H@
M("`@("`@("!M86ME(&-O;7!L971E9`T*("H@("`@("`@("!M<'!R=6X@+6X@
M,B`N+V-O;7!L971E9`T*("H-"B`J(%1H92!L87-T(&YU;6)E<B!P<FEN=&5D
M(&ES('-U<'!O<V5D('1O(&)E(#$T,#`L(&EN<W1E860@:70@<')I;G1S(#`N
M#0H@*@T*("H@5&AE('!R;V)L96T@:7,@:6X@=&AE('5S92!O9B!-4$E?5'EP
M95]E>'1E;G0-"B`J#0H@*B!1.B!)<R!T:&ES(&YO="!T:&4@<FEG:'0@=V%Y
M('1O('5S92!T:&ES(')O=71I;F4_#0H@*@T*("H@43H@27,@=&AI<R!N;W0@
M=&AE(&EN=&5N="!O9B!R;W5T:6YE($U025]4>7!E7V5X=&5N=#\-"B`J#0H@
M*B`@("!/;B!T:&4@5#-%.B!4:&4@9F]L;&]W:6YG('-T<G5C='5R97,@87)E
M(&QA:60@;W5T('1H:7,@=V%Y.@T*("H-"B`J("`@("`@("`@("![9FQO870L
M(&EN='T@("`@("!A<F4@;&%I9"!O=70@87,@<VAO=VX@8F5L;W<@87,-"B`J
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`H;V9F<V5T+"!S:7IE*2!P
M86ER<SH-"B`J("`@("`@("`@("`@*#`L-"DL("@X+#@I("`@("`H869T97(@
M=&AE(&9L;V%T+"!T:&5R92!I<R!A(#0@8GET92!P860I#0H@*@T*("H@("`@
M268@22!H860@82!S=')U8W0@;V8@=&AE('1Y<&4Z#0H@*@T*("H@("`@("`@
M("`@('MF;&]A="P@9FQO871]("`@=&AE>2!W;W5L9"!L86ED(&]U="!A<R!F
M;VQL;W=S.@T*("H-"B`J("`@("`@("`@("`@*#`L-"DL("@T+#0I#0H@*@T*
M("H@22!C86X@8V%L8W5L871E('1H92!B>71E(&]F9G-E="!A;F0@=7-E('1H
M870@:6X@8G5I;&1I;F<@=&AE(&1E<FEV960-"B`J(&1A=&$@='EP92X@($)U
M="!)('=A<R!N;W0@<W5R92!W:&%T('1H92!I;G1E;G0@;V8@35!)7U1Y<&5?
M97AT96YT('=A<RX-"B`J("`-"B`J($EN('1H:7,@8V]D92P@=V4@87)E('5S
M:6YG('MF;&]A="P@:6YT?2X-"B`J#0H@*BTM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2`J+PT*#0HC:6YC;'5D92`B;7!I+F@B#0H-"B-D969I;F4@4$%#
M2T547T),3T-+4R`R("`@("\J(&YU;6)E<B!O9B!E;&5M96YT<R!I;B!S=')U
M8W0@*B\-"B-D969I;F4@1DU!6"`Q-"`@("`@("`@("`@("\J(&QE;F=T:"!O
M9B!A<G)A>2!O9B!F;W)C97,@*B\-"B-D969I;F4@4$%#2T545$%'(#DY("`@
M("`@("\J($U022!T86<@9F]R('!A8VME="!T;R!B92!S96YT(&%N9"!R96-E
M:79E9"`J+PT*(V1E9FEN92!$15-44D%.2R`Q("`@("`@("`@+RH@<F%N:R!O
M9B!D97-T:6YA=&EO;B!P<F]C97-S("HO#0HC9&5F:6YE(%-/55)#15)!3DL@
M,"`@("`@("`O*B!R86YK(&]F('-O=7)C92!P<F]C97-S("HO#0HC9&5F:6YE
M($U934%34R`Q-3`N,"`@("`@("`O*B!A<F)I=')A<GD@8V]N<W1A;G0@*B\-
M"@T*;6%I;B@@:6YT(&%R9V,L(&-H87(@*BIA<F=V("D-"GL-"B`@:6YT(&%R
M<F%Y7V]F7V)L;V-K;&5N9W1H<UM004-+151?0DQ/0TM372`-"B`@("`@(#T@
M>S$L($9-05A]+"`@("`@("`@("`@("`@("`@("`@+RH@9F]R($U022!S=')U
M8W0@*B\-"B`@("!I+"`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M+RH@;&]O<"!I;F1E>"`J+PT*("`@(&UY7U!%7VYU;2`[("`@("`@("`@("`@
M("`@("`@("`@("`O*B!R86YK(&EN(&-O;6UU;FEC871O<B!O9B!P<F]C97-S
M("HO#0H-"B`@35!)7T%I;G0@97AT96YT+"`@("`@("`@("`@("`@("`@("`@
M("`@("`@+RH@97AT96YT(&]F(&9L;V%T("HO#0H@("`@87)R87E?;V9?9&ES
M<&QA8V5M96YT<UM004-+151?0DQ/0TM372`[("\J(&9O<B!-4$D@<W1R=6-T
M("HO#0H-"B`@35!)7T1A=&%T>7!E(`T*("`@(&%R<F%Y7V]F7W1Y<&5S6U!!
M0TM%5%]"3$]#2U-=(`T*("`@("`@/2![35!)7T9,3T%4+"!-4$E?24Y4?2P@
M("`@("`@("`@("`@("\J(&9O<B!-4$D@<W1R=6-T("HO#0H@("`@<&%C:V5T
M='EP92`[#0H-"B`@35!)7U-T871U<R!S=&%T=7,@.R`@("`@("`@("`@("`@
M("`@("`@("`@+RH@<W1A='5S(&]F(')E8V5I=F5D(&UE<W-A9V4@*B\-"@T*
M("`O*B!792!W86YT('1O('-E;F0@<&%C:V5T+"!A(&-O;G1I9W5O=7,@0R!S
M=')U8W0@=VET:"!M:7AE9"!T>7!E<RX@*B\-"B`@+RH@1&5C;&%R92!P86-K
M970@<')I;W(@=&\@8V]N<W1R=6-T:6YG(&$@;F5W(&1E<FEV960@9&%T871Y
M<&4N("HO#0H-"B`@<W1R=6-T>PT*("`@(&9L;V%T(&UA<W,@.R`@("`@("`@
M("`@("`@("`@("`@("`@("`@("\J(&%N(&]B:F5C="=S(&UA<W,@*B\-"B`@
M("!I;G0@9F]R8V5;1DU!6%T@.R`@("`@("`@("`@("`@("`@("`@("`@+RH@
M87)R87D@;V8@9F]R8V5S("HO#0H@('T@<&%C:V5T(#L-"@T*("`O*B!);FET
M:6%L:7IE('!A8VME="!T;R!Z97)O+B`J+PT*#0H@('!A8VME="YM87-S(#T@
M,"XP(#L-"@T*("!F;W(@*&D],#L@:2`\($9-05@[(&DK*RD-"B`@("`@("`@
M('!A8VME="YF;W)C95MI72`](#`N,"`[#0H-"B`@+RH@4V5T=7`@=&AE($U0
M22!E;G9I<F]N;65N="X@*B\-"@T*("!-4$E?26YI="@@)F%R9V,L("9A<F=V
M("D@.PT*("!-4$E?0V]M;5]R86YK*"!-4$E?0T]-35]73U),1"P@)FUY7U!%
M7VYU;2`I(#L-"B`@<')I;G1F("@@(E1A<VL@)60@:6YI=&EA;&EZ961<;B(L
M(&UY7U!%7VYU;2`I(#L-"@T*("`O*B!.;W1E('1H870@86QL('1H92!F;VQL
M;W=I;F<@=F%R:6%B;&5S(&%R92!C;VYS=&%N=',@*B\-"B`@+RH@86YD(&1E
M<&5N9"!O;FQY(&]N('1H92!F;W)M870@;V8@=&AE($,@<W1R=6-T+B`J+PT*
M#0H@($U025]4>7!E7V5X=&5N="`H35!)7T9,3T%4+"`F97AT96YT*2`[("`@
M("`O+R`@*BHJ*BHJ($ES('1H:7,@=W)O;F<_#0H-"B`@<')I;G1F*")%>'1E
M;G0@/2`E9"P@<VEZ92!O9B!F;&]A="`]("5D7&XB+"!E>'1E;G0L('-I>F5O
M9BAF;&]A="DI.PT*("!P<FEN=&8H(D%D9')E<W-E<R`E,C!X("`E,C!X7&XB
M+"`F*'!A8VME="YM87-S*2P@)BAP86-K970N9F]R8V4I*3L-"@T*("!A<G)A
M>5]O9E]D:7-P;&%C96UE;G1S6S!=(#T@,"`[(`T*("!A<G)A>5]O9E]D:7-P
M;&%C96UE;G1S6S%=(#T@97AT96YT(#L@#0H-"B`@+RH@57-E('1H97-E('9A
M<FEA8FQE<R!T;R!C<F5A=&4@82!N97<@9&5R:79E9"!D871A='EP92!A;F0@
M8V]M;6ET+B`J+PT*#0H@($U025]4>7!E7W-T<G5C="`H4$%#2T547T),3T-+
M4RP@#0H)"2`@(&%R<F%Y7V]F7V)L;V-K;&5N9W1H<RP-"@D)("`@87)R87E?
M;V9?9&ES<&QA8V5M96YT<RP-"@D)("`@87)R87E?;V9?='EP97,L#0H)"2`@
M("9P86-K971T>7!E*2`[#0H-"B`@35!)7U1Y<&5?8V]M;6ET("@F<&%C:V5T
M='EP92D@.PT*#0H@("\J(`T*+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M("HO#0H-"B`@:68@*"!M>5]015]N=6T@/3T@4T]54D-%4D%.2R`I('L-"@T*
M("`@("\J($=I=F4@<&%C:V5T('9A;'5E<R!S;R!W92!C86X@=F5R:69Y('1H
M97D@9V5T('-E;G0N("HO#0H-"B`@("!P86-K970N;6%S<R`]($U934%34R`[
M#0H-"B`@("!F;W(@*&D],#L@:2`\($9-05@[(&DK*RD-"B`@("`@('!A8VME
M="YF;W)C95MI72`]("AI*S$I("H@,3`P(#L-"@T*("`@("\J(%-E;F0@<&%C
M:V5T='EP92!W:71H(&-O=6YT/3$N("HO#0H-"B`@("!-4$E?4V5N9"@@)G!A
M8VME="P@,2P@<&%C:V5T='EP92P@1$535%)!3DLL(`T*"2`@("`@4$%#2T54
M5$%'+"!-4$E?0T]-35]73U),1"`I(#L-"B`@?0T*#0H@("\J(`T*+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM("HO#0H-"B`@96QS92!I9B`H(&UY7U!%
M7VYU;2`]/2!$15-44D%.2R`I('L-"@T*("`@("\J(%1A<VL@=VET:"!$15-4
M4D%.2R!W:6QL(')E8V5I=F4@<&%C:V5T='EP92!W:71H(&-O=6YT/3$@*B\-
M"@T*("`@("\J(%!R:6YT('!A8VME="!B969O<F4@=&AE(')E8V5I=F4N("HO
M#0H-"B`@("!P<FEN=&8@*")686QU92!O9B!P86-K970@8F5F;W)E(')E8V5I
M=F4Z7&XB*2`[#0H@("`@<')I;G1F("@B36%S<R`]("`E+C-F(%QN(BP@<&%C
M:V5T+FUA<W,I(#L-"B`@("!P<FEN=&8@*")!<G)A>2!O9B!F;W)C97,@/2`B
M("D@.R`-"B`@("!F;W(@*"!I/3`[(&D@/"!&34%8.R!I*RL@*2`-"B`@("`@
M('!R:6YT9B`H(B5D("`B+"!P86-K970N9F]R8V5;:5T@*2`[(`T*("`@('!R
M:6YT9B`H(")<;B(@*2`[(`T*#0H@("`@35!)7U)E8W8H("9P86-K970L(#$L
M('!A8VME='1Y<&4L(%-/55)#15)!3DLL(`T*"2`@("`@4$%#2T545$%'+"!-
M4$E?0T]-35]73U),1"P@)G-T871U<R`I(#L-"@T*("`@("\J(%9E<FEF>2!T
M:&%T('-T<G5C='5R92!G;W0@<&%S<V5D+B`J+PT*#0H@("`@+RH@4')I;G0@
M<&%C:V5T(&)E9F]R92!T:&4@<F5C96EV92X@*B\-"@T*("`@('!R:6YT9B`H
M(EQN5F%L=64@;V8@<&%C:V5T(&%F=&5R(')E8V5I=F4Z7&XB*2`[#0H@("`@
M<')I;G1F("@B36%S<R`]("`E+C-F(%QN(BP@<&%C:V5T+FUA<W,I(#L-"B`@
M("!P<FEN=&8@*")!<G)A>2!O9B!F;W)C97,@/2`B("D@.R`-"B`@("!F;W(@
M*"!I/3`[(&D@/"!&34%8.R!I*RL@*2`-"B`@("`@('!R:6YT9B`H(B5D("`B
M+"!P86-K970N9F]R8V5;:5T@*2`[(`T*("`@('!R:6YT9B`H(")<;B(@*2`[
M(`T*#0H@('T-"@T*("`O*B`-"BTM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
M+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM+2TM
C+2`J+PT*#0H@("`@35!)7T9I;F%L:7IE*"D@.PT*?0T*#0H`
`
end