Searching in test cases/fortran/3 module procedure