🔒 Locked

FORTRAN syntax qn.

Started by NickB Feb 1, 2004 at 4:49 PM 7 replies 900+ views

Original Post

Feb 1, 2004 at 4:49 PM

Does anyone know what this does in FORTRAN 77 ?

       GO TO (330,320),INMR

INMR is a variable that is essentially random. My guess is that this is some kind of primitive switch statement (ie jump to line 330 or 320 on basis of the value of INMR), but I can''t find any references to it (including F95 Explained by Metcalf & Reid) - can anyone confirm/blow up my theory, or even better explain what it does do ... I''ve just spent the weekend doubled over a 90 page listing of unstructured code & am about ready to cry (forget the C# / C++ debate!)....

Cedric

Feb 1, 2004 at 9:06 PM

quote:
Original post by NickB
Does anyone know what this does in FORTRAN 77 ?

GO TO (330,320),INMR

Google found your answer.

Congratulation. It''s a switch!

quote:
I''ve just spent the weekend doubled over a 90 page listing of unstructured code & am about ready to cry

Let me guess... You''re a graduate student in physics or chemistry?

Ademan555

Feb 1, 2004 at 9:09 PM

Heh, well its actually a bit more functional than a switch (well kinda, cant take characters im sure, but still the fact that its a simple goto gives u a bit more power), though gotos are considered bad practice anyways... does fortran have whiles and fors?

Cedric

Feb 1, 2004 at 9:18 PM

quote:
Original post by Ademan555
Heh, well its actually a bit more functional than a switch (well kinda, cant take characters im sure, but still the fact that its a simple goto gives u a bit more power)

Goto powerful? Oh yeah; like a shotgun in a kitchen

quote:
does fortran have whiles and fors?

IIRC, not in its ''77 incarnation. They could be built out of if''s and goto''s, so they''re not needed

Cédric

Doc

Feb 1, 2004 at 9:54 PM

I learned Fortran 77 so I could do a physics project. It worked out OK, but now I know why C was created (and I''m glad it was). ''77 sucks donkey balls, and I feel pity for anyone forced to use it.

The following statement is true. The previous statement is false.
Shameless promotion:
FreePop: The GPL Populous II clone.

Ademan555

Feb 2, 2004 at 12:08 AM

You mean a shotgun in a china shop :-), also the ifs and gotos, i knew that, thats all they are, theyre jsut more controlled... taking a few ounces of gunpowder out of your shotgun shells

[edited by - Ademan555 on February 2, 2004 1:11:00 AM]

NickB

Feb 2, 2004 at 3:14 AM

Thanks for your help guys!

quote:
Original post by Cedric
quote:
I''ve just spent the weekend doubled over a 90 page listing of unstructured code & am about ready to cry
Let me guess... You''re a graduate student in physics or chemistry?

Good guess, although not quite - Civil Engineering - the code is related to calculating earthquake hazard.

quote:

does fortran have whiles and fors?

It does have a couple of similar structs, for example there is a DO loop, eg:


       DO 10 I=1,10

C Do something useful in a loop, eg print a message....
       PRINT *,"Hello World ! ",I

    10 CONTINUE

Ademan555

Feb 2, 2004 at 9:35 AM

Wow thats ugly lookin, i feel sorry for yah lol

NickB

Feb 2, 2004 at 10:00 AM

Whats more, the observant amongst you will have noticed is that I inserted 1 to many spaces in the left-hand side (the left hand margin in F77 should be WS or a character - indicates a comment, 4 either WS or numbers - give line numbers & then another character or WS to indicate a continued line - total 6 columns....then anything written after column 72 is considered invalid too & some use for comments.....makes printing the code a real mess!

Topic Locked

This topic has been locked by a moderator. New replies are not allowed.