BUG #17409: Unable to alter data type of clustered column which is referenced by foreign key

The following bug has been logged on the website:

Bug reference:      17409
Logged by:          Holly Roberts
Email address:      holly.roberts@starlingbank.com
PostgreSQL version: 14.2
Operating system:   Debian 10.2.1-6
Description:

When attempting to change the data type of a column that has previously been
clustered on, which is also referenced by a foreign key, then an exception
is thrown.

Reproduction steps using a fresh database:
    CREATE TABLE parent (
        parent_field INTEGER CONSTRAINT pk_parent PRIMARY KEY
    );
    CREATE TABLE child (
        child_field INTEGER,
        CONSTRAINT fk_child FOREIGN KEY (child_field) REFERENCES parent
(parent_field)
    );
    CLUSTER parent USING pk_parent;
    ALTER TABLE parent ALTER COLUMN parent_field SET DATA TYPE BIGINT;

This throws the following error:
    ERROR:  relation 16458 has multiple clustered indexes
    'SELECT 16458::regclass' returns 'parent';
This has previously worked on various versions of postgres 12 and 13 for me
(latest tried 13.6)

I have reproduced the following on both 14.2 and 14.0, my postgres version
is as follows:
    SELECT version();
    PostgreSQL 14.2 (Debian 14.2-1.pgdg110+1) on x86_64-pc-linux-gnu, compiled
by gcc (Debian 10.2.1-6) 10.2.1 20210110, 64-bit

Some minor observations:
- Removing the FK allows the data type to be changed
- Occurs for both primary key/unique index
- Occurs on other data types (eg. going from TEXT to BIGINT with 'USING')

Looking through pg_catalog I can also see that only one index is clustered
as would be expected:
    SELECT
      table_cls.relnamespace::regnamespace::text AS schema,
      table_cls.relname AS table,
      index_cls.relname AS index,
      indisclustered
    FROM pg_index pi
    INNER JOIN pg_class index_cls ON (pi.indexrelid = index_cls.oid)
    INNER JOIN pg_class table_cls ON (pi.indrelid = table_cls.oid)
    WHERE (table_cls.relnamespace::regnamespace::text, table_cls.relname) =
('public', 'parent');

     schema | table  |   index   | indisclustered
    --------+--------+-----------+----------------
     public | parent | pk_parent | t
    (1 row)

Many Thanks,
Holly Roberts