comp.lang.idl-pvwave archive: archive » Looking for more ideas on code ...

Home » Public Forums » archive » Looking for more ideas on code ...

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: Looking for more ideas on code ... [message #32346 is a reply to message #32276]

Wed, 02 October 2002 07:13

meinel
Messages: 14
Registered: February 1994

Junior Member

jeyadev@wrc.xerox.bounceback.com (Surendar Jeyadev) wrote in message news:<anac2a$53h$1@news.wrc.xerox.com>...
> function sinc, y
>
>
> if(n_elements(y) eq 1) then begin ; y is a scalar
> if(y eq 0.0) then profile = 1.0 else begin
> profile = sin(y)/y
> endelse
> endif else begin ; y is a vector
> zeros = where(y eq 0.0, ind)
> if(ind gt 0) then y(zeros) = 1.0e-10 ; set zeroes to a small quantity
> profile = sin(y)/y
> endelse
>
> profile = profile*profile/a0
>
>
> return, profile
>
> end

Neat tricks! But, how about the one-line solution:

profile = (sin(y) + (y EQ 0))/(y + (y EQ 0))

Ed M

Report message to a moderator

[Message index]

		Looking for more ideas on code ... By: jeyadev on Mon, 30 September 2002 13:26
		Re: Looking for more ideas on code ... By: jeyadev on Wed, 02 October 2002 13:26
		Re: Looking for more ideas on code ... By: jeyadev on Wed, 02 October 2002 13:28
		Re: Looking for more ideas on code ... By: David Fanning on Wed, 02 October 2002 08:26
		Re: Looking for more ideas on code ... By: Craig Markwardt on Wed, 02 October 2002 08:13
		Re: Looking for more ideas on code ... By: thompson on Wed, 02 October 2002 07:24
		Re: Looking for more ideas on code ... By: meinel on Wed, 02 October 2002 07:13

Previous Topic:	ROI application...
Next Topic:	Re: Array comparison

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Tue Dec 02 13:34:06 PST 2025

Total time taken to generate the page: 1.92237 seconds