Inferring Schema from VARIANT Fields in Snowflake

How to automatically discover and flatten JSON schema from VARIANT columns in Snowflake using recursive FLATTEN and TYPEOF, without manually writing extraction logic for every field.