In fortran 90, how do I program the equivalent of a handle in matlab [duplicate]

Answer 1

Simple: use a wrapping function... If this is your original function f:

integer function f(a,b) 
  implicit none
  integer,intent(in) :: a, b

  f = a + b
end function

You could wrap it into a one-argument-function wrapper_fct with constant b1 like this:

integer function wrapper_fct(a)
  implicit none
  integer,intent(in) :: a
  integer,parameter  :: b1 = 10

  wrapper_fct = f(a, b10)
end function

or, even simpler:

integer function wrapper_fct(a)
  implicit none
  integer,intent(in) :: a

  wrapper_fct = f(a, 10)
end function