I have this simple code in fortran with three subroutines:
module test contains subroutine aa1(aa,bb,cc) implicit none !---------------------