Re: direct product of two sets

*To*: mathgroup at smc.vnet.net*Subject*: [mg53283] Re: [mg53264] direct product of two sets*From*: Tomas Garza <tgarza01 at prodigy.net.mx>*Date*: Tue, 4 Jan 2005 03:13:21 -0500 (EST)*References*: <200501030929.EAA10701@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Perhaps this will help: In[1]:= a = {a1, a2, a3}; b = {b1, b2, b3}; In[5]:= Flatten[Outer[List, a, b], 1] Out[5]= {{a1, b1}, {a1, b2}, {a1, b3}, {a2, b1}, {a2, b2}, {a2, b3}, {a3, b1}, {a3, b2}, {a3, b3}} Tomas Garza Mexico City ----- Original Message ----- From: "Cong" <vo.chi.cong at is.titech.ac.jp> To: mathgroup at smc.vnet.net Subject: [mg53283] [mg53264] direct product of two sets > Hello! > > Give 2 finite sets A and B, how can I compute their direct product > A x B := {(a,b) : a\in A, b\in B} > > Can someone help me? > > Best Regards, > > Cong > >

**References**:**direct product of two sets***From:*vo.chi.cong@is.titech.ac.jp (Cong)