Re: square wave function

*To*: mathgroup at smc.vnet.net*Subject*: [mg31694] Re: square wave function*From*: bghiggins at ucdavis.edu (Brian Higgins)*Date*: Sat, 24 Nov 2001 16:44:11 -0500 (EST)*References*: <9tlb73$pep$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Peter, Try this: g[x_ /; 0 <= x <= 1] := 1 g[x_ /; 1 <= x <= 2] := -1 g[x_] := g[Mod[x, 2]] Plot[g[x], {x, -10, 10}] Cheers, Brian peterangelo at mindspring.com (Peter Dimitriou) wrote in message news:<9tlb73$pep$1 at smc.vnet.net>... > 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