Add a subroutine example with allocation on the Fortran side