RE: Illumination or obfuscation?
- To: mathgroup at smc.vnet.net
- Subject: [mg43971] RE: [mg43943] Illumination or obfuscation?
- From: "John C. Erb, Ph.D." <John_C_Erb at prodigy.net>
- Date: Thu, 16 Oct 2003 04:16:03 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I certainly would not call myself a Mathematica expert, though I have been "playing" with Mathematica for 10 years. For me, it is not clear and easy to understand. My 2 cents John C. Erb Email: John_C_Erb at prodigy.net -----Original Message----- From: Steven T. Hatton [mailto:hattons at globalsymmetry.com] To: mathgroup at smc.vnet.net Subject: [mg43971] [mg43943] Illumination or obfuscation? To an experienced Mathematica user, is the following snippet clear, and easy to understand, or simply an exercise in obfuscation? Assume I already have px,py and m[] lying around. px = {1, 0}; py = {0, 1}; m[th_] := {{Cos[th], Sin[th]}, {-Sin[th], Cos[th]}} crossPoint[p_, th_:0, L_:0.5] := Arrow[##,HeadLength -> 0.015]&@@#&/@(p+#.m[th]&/@{-#, #}&/@(L{px, py}))