allocatable_function_1.f90 2.69 KB