Contact US

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-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!

*Tek-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

problem with passing function arguments

problem with passing function arguments

problem with passing function arguments

Hello All,
I'm a newbie and I'm having trouble with passing arguments to external functions in Fortran. Each of the functions has several arguments, all in the same format: real. However, when they're passed, the correct values of only some are passed.
For example:

This is my function call for "clderivatives" inside my main program

     & qhat(m),de(m),Cl,radalt(m),gear(m))

I check the values of all the variables right before the function is called and then inside the function file. All of them are passed correctly except mach(m) and alpha(m).

the mach(m) value should be around: 0.4 and it is passed as: 2x10e-38

Here is the first few statements of my function:

     real FUNCTION clderivatives(flapave,flap,mach,alpha,
     & qhat,de,Cl,radalt,gear) RESULT(Clres)
    real flapave
    real flap
    real mach
    real alpha
    real qhat
    real de
    real Cl
    real radalt
    real gear

I am not manipulating these variables in any way inside my function. Only using them to find dummy variables and calculate the result.

If anybody knows what the problem might be, I'd really appreciate it if you could reply to this post.

Thank you.


RE: problem with passing function arguments

Check up the actual type of mach array in callee context. It seems it may be integer...

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 Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

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

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

Close Box

Join Tek-Tips® Today!

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

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close