Again, thanks to all. I do appreciate it.
Simple yes, but in mikroms solution that single call now becomes two subroutine calls with a full (and large in this application) argument list and a long-as-your-arm select case or if-else structure in the first subroutine called before you even get...
This in code/psuedo-code is what I want to do.
MODULE JIMMY
!
CONTAINS
SUBROUTINE ALPHA (identical_dummy_arg_list)
! Does stuff with args
END SUBROUTINE ALPHA
!
SUBROUTINE BRAVO (identical_dummy_arg_list)
! Does different stuff with args but updates the same args
END SUBROUTINE BRAVO
!
END...
Hello xwb,
That's a valiant effort but it doesn't make it.
You can see from your main here:
call greek(adata, 65)
call greek(bdata, 66)
You are able to access the two different subroutines using the types 'adata' and 'bdata' to match the type of the called subroutine.
However that...
Hello all,
I need to do the following in Fortran 90.
I have two subroutines that perform similar tasks, lets call them subroutine ALPHA and subroutine BRAVO. Lets say they have SAME dummy argument list, same sequence ranks, same kinds to all args.
So.. SUBROUTINE...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.