Re: square wave function

*To*: mathgroup at smc.vnet.net*Subject*: [mg31695] Re: [mg31663] square wave function*From*: Maryvonne Teissier <my.teissier at cybercable.fr>*Date*: Sat, 24 Nov 2001 16:44:13 -0500 (EST)*References*: <200111231046.FAA24071@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Peter Try square[x_] := Sign [1 - Mod [x , 2] ] Maryvonne Teissier Peter Dimitriou a *crit : > To all who responded last time I posted, thank you, I was able to > resolve that on my own. > > My new Question deals with the following lines of Mathematica code: > > Clear[square] > square[x_] := 1 /; 0<x<1 > square[x_] := -1 /; -1<x<0 > > Plot[square[x], {x,-1,1}] > > This defines and plots a square wave of period 2 between -1 and 1. > The question is how do I define this for all x (-inf<x<inf, with > period 2) in Mathematica? The Only hint I get is to consider using > the Mod function. Scratched my head long enough anyone out there > willing to help? > > Peter

**References**:**square wave function***From:*peterangelo@mindspring.com (Peter Dimitriou)