program procedure_decl_01_a
use, non_intrinsic :: procedure_decl_01_b
end program procedure_decl_01_a