clean up frank_function.f90 and wrappers