comp.lang.idl-pvwave archive: archive » Re: [Q]: ID analog to FORTRAN "sign" function

Home » Public Forums » archive » Re: [Q]: ID analog to FORTRAN "sign" function

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

Re: [Q]: ID analog to FORTRAN "sign" function [message #21930 is a reply to message #21929]

Mon, 09 October 2000 00:00

Alex Schuster
Messages: 124
Registered: February 1997

Senior Member

Rostyslav Pavlichenko wrote:

> Does the IDl have something close to Fortran SIGN (DSIGN... so on...)
> functions
>
> IN FORTRAN:
> Elemental Intrinsic Function (Generic):
> Returns the absolute value of the first argument times the sign of the
> second argument.
>
> Syntax:
> =======
> result = SIGN (a, b)
> a (Input) Must be of type integer or real.
>
> b Must have the same type and kind parameters as a.
>
> Results:
> =========
> The result type is the same as a.
> The value of the result is
> | a | if b >= zero
> and -| a | if b < zero.

No, but you can easily write it:

function sign, a, b
if ( b ge 0 ) then $
return, abs( a ) $
else $
return, -abs( a )
end

It works for both integer and float data types

Alex
--
Alex Schuster Wonko@weird.cologne.de PGP Key available
alex@pet.mpin-koeln.mpg.de

Report message to a moderator

[Message index]

		Re: [Q]: ID analog to FORTRAN "sign" function By: Craig Markwardt on Mon, 09 October 2000 00:00
		Re: [Q]: ID analog to FORTRAN "sign" function By: Alex Schuster on Mon, 09 October 2000 00:00

Previous Topic:	unformatted ascii data to arrays
Next Topic:	SEGY format

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Sat Oct 11 03:00:38 PDT 2025

Total time taken to generate the page: 1.03584 seconds