| Step | Hyp | Ref | Expression | 
						
							| 1 |  | tsmscl.b |  | 
						
							| 2 |  | tsmscl.1 |  | 
						
							| 3 |  | tsmscl.2 |  | 
						
							| 4 |  | tsmscl.a |  | 
						
							| 5 |  | tsmscl.f |  | 
						
							| 6 |  | haustsms.j |  | 
						
							| 7 |  | haustsms.h |  | 
						
							| 8 |  | eqid |  | 
						
							| 9 |  | eqid |  | 
						
							| 10 |  | eqid |  | 
						
							| 11 | 8 9 10 4 | tsmsfbas |  | 
						
							| 12 |  | fgcl |  | 
						
							| 13 | 11 12 | syl |  | 
						
							| 14 | 1 8 2 4 5 | tsmslem1 |  | 
						
							| 15 | 1 6 | tpsuni |  | 
						
							| 16 | 3 15 | syl |  | 
						
							| 17 | 16 | adantr |  | 
						
							| 18 | 14 17 | eleqtrd |  | 
						
							| 19 | 18 | fmpttd |  | 
						
							| 20 |  | eqid |  | 
						
							| 21 | 20 | hausflf |  | 
						
							| 22 | 7 13 19 21 | syl3anc |  | 
						
							| 23 | 1 6 8 10 2 4 5 | tsmsval |  | 
						
							| 24 | 23 | eleq2d |  | 
						
							| 25 | 24 | mobidv |  | 
						
							| 26 | 22 25 | mpbird |  |