comp.lang.idl-pvwave archive: archive » Fortran -> IDL translator

Home » Public Forums » archive » Fortran -> IDL translator

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

Re: FORTRAN -> IDL [message #10722 is a reply to message #2702]

Sun, 11 January 1998 00:00

rivers
Messages: 228
Registered: March 1991

Senior Member

In article <34B9133C.3E4E6636@linmpi.mpg.de>, Kevin Ivory <Kevin.Ivory@linmpi.mpg.de> writes:
> Kelly Dean wrote:
>>
>> I am converted some FORTRAN code into IDL, but I am confused what this
>> FORTRAN statment "SINE(X)=SIN(.01745329*X) " in this function is trying
>> to do.
>
> It looks like it takes the angle in degrees X, calculates the sine
> and puts it into the Xth array element of the array SINE.
> Something like IDLs
> sine = sin(!dtor * x)
> where both x and sine are arrays.

No, I think this is what is called a "Statement Function" in FORTRAN. It is
basically a 1-line function definition. This one says that SINE(X) is the same
as SIN(X), except that it takes its argument in degrees rather than radians.

____________________________________________________________
Mark Rivers (773) 702-2279 (office)
CARS (773) 702-9951 (secretary)
Univ. of Chicago (773) 702-5454 (FAX)
5640 S. Ellis Ave. (708) 922-0499 (home)
Chicago, IL 60637 rivers@cars.uchicago.edu (e-mail)

or:
Argonne National Laboratory (630) 252-0422 (office)
Building 434A (630) 252-0405 (lab)
9700 South Cass Avenue (630) 252-1713 (beamline)
Argonne, IL 60439 (630) 252-0443 (FAX)

Report message to a moderator

[Message index]

		Fortran -> IDL translator By: uk2 on Wed, 31 August 1994 15:50
		Re: Fortran -> IDL translator By: amaravad on Fri, 02 September 1994 09:01
		Re: FORTRAN -> IDL By: Harald Frey on Mon, 12 January 1998 00:00
		Re: FORTRAN -> IDL By: Robert S. Hill on Sun, 11 January 1998 00:00
		Re: FORTRAN -> IDL By: rivers on Sun, 11 January 1998 00:00
		Re: FORTRAN -> IDL By: Kevin Ivory on Sun, 11 January 1998 00:00

Previous Topic:	IDL procedure to read UF data
Next Topic:	Problem setting up emacs idl-shell

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Wed Oct 08 19:56:35 PDT 2025

Total time taken to generate the page: 0.00393 seconds