Theorem kardval

Description: The value of the kard function. This theorem depends on the Axiom of Regularity and the Axiom of Infinity, but it does not depend on the Axiom of Choice. See also kardval2 . (Contributed by BTernaryTau, 3-Jul-2026)

	Ref	Expression
Assertion	kardval	|- ( kard ` A ) = Scott { x | x ~~ A }

Proof

Step	Hyp	Ref	Expression
1		breq2	|- ( y = A -> ( x ~~ y <-> x ~~ A ) )
2	1	abbidv	|- ( y = A -> { x | x ~~ y } = { x | x ~~ A } )
3	2	scotteqd	|- ( y = A -> Scott { x | x ~~ y } = Scott { x | x ~~ A } )
4		df-kard	|- kard = ( y e. _V |-> Scott { x | x ~~ y } )
5		scottex2	|- Scott { x | x ~~ A } e. _V
6	3 4 5	fvmpt	|- ( A e. _V -> ( kard ` A ) = Scott { x | x ~~ A } )
7		fvprc	|- ( -. A e. _V -> ( kard ` A ) = (/) )
8		scott0i	|- Scott (/) = (/)
9	7 8	eqtr4di	|- ( -. A e. _V -> ( kard ` A ) = Scott (/) )
10		simpr	|- ( ( x e. _V /\ A e. _V ) -> A e. _V )
11	10	con3i	|- ( -. A e. _V -> -. ( x e. _V /\ A e. _V ) )
12		encv	|- ( x ~~ A -> ( x e. _V /\ A e. _V ) )
13	11 12	nsyl	|- ( -. A e. _V -> -. x ~~ A )
14	13	alrimiv	|- ( -. A e. _V -> A. x -. x ~~ A )
15		ab0	|- ( { x | x ~~ A } = (/) <-> A. x -. x ~~ A )
16	14 15	sylibr	|- ( -. A e. _V -> { x | x ~~ A } = (/) )
17	16	scotteqd	|- ( -. A e. _V -> Scott { x | x ~~ A } = Scott (/) )
18	9 17	eqtr4d	|- ( -. A e. _V -> ( kard ` A ) = Scott { x | x ~~ A } )
19	6 18	pm2.61i	|- ( kard ` A ) = Scott { x | x ~~ A }