def METHOD_NAME():
    """Test that renaming type bound pointers of procedure methods rename
    only the pointer and not the implementation, even if the pointer and the
    implementation share the same name
    """
    string = write_rpc_request(1, "initialize", {"rootPath": str(test_dir)})
    file_path = test_dir / "test_prog.f08"
    string += rename_request("bp_rename", file_path, 18, 25)
    errcode, results = run_request(string)
    assert errcode == 0
    ref = {}
    ref[path_to_uri(str(file_path))] = [create("bp_rename", 18, 16, 18, 26)]
    ref[path_to_uri(str(test_dir / "subdir" / "test_free.f90"))] = [
        create("bp_rename", 15, 27, 15, 37)
    ]
    check_rename_response(results[1]["changes"], ref)