×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Contact US

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

What is the different between "return 1" and "return"?

What is the different between "return 1" and "return"?

What is the different between "return 1" and "return"?

(OP)
What is the different between "return 1" and "return"?

RE: What is the different between "return 1" and "return"?

The simple RETURN just returns from the subroutine to whatever followed the CALL statement in the calling program. RETURN 1  returns to the first alternate return point designated in the CALL statement argument list. For each alternate return possible from the called subroutine (not from a function subprogram), there is an asterisk character ('*') in the dummy argument list. In the calling program, the corresponding return points are inserted in the CALL statement in the form: '*n' where the "n" are the statement labels of the statements to which control may be passed when the RETURN n occurs. For example:

Calling program:

...
      CALL SUB1(X,Y,*10)
      Y= ....
...
   10 Z= ....


      SUBROUTINE SUB1(ARG1,ARG2,*)
...
      ARG2 = ...
      IF(ARG2.LE.0)THEN
...
         RETURN 1
      ELSE
...
         RETURN
         END IF
...


The subroutine will specify the alternate return (to statement labeled 10 in the calling program) if ARG2 is not positive. Otherwise return is made to the line after the CALL.

All of this is found in any good Fortran reference, available in textbook form or online.

RAR

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members! Already a Member? Login



News


Close Box

Join Eng-Tips® Today!

Join your peers on the Internet's largest technical engineering professional community.
It's easy to join and it's free.

Here's Why Members Love Eng-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close