> Date: Thu, 6 Feb 2003 18:29:19 -0800
> From: "Y.K. ZHOU" <[log in to unmask]>
> Hi All,
>
> Just a quick question for f77:
>
> Suppose I have a subroutine
>
> -----
> subroutine system_solve( ..., solver)
>
> external solver
>
> ---
>
> Where "solver" is an external subroutine that
> corresponds to different methods.
>
> Is there a fortran function that can print out the
> name of the input solver ?
No, but you can pass the name via an INTENT(OUT) dummy argument.
> What I want to do is that at the end of the
> call to system_solve, I can print out sth like:
>
> The solver : name_of_the_solver converges in n
> steps etc
>
> So that the users can easily tell which method was
> used for the output, and they can see the different
> efficiency of different methods.
>
> Thanks.
|