8 lines
		
	
	
		
			105 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			8 lines
		
	
	
		
			105 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| defn main = {
 | |
|     case True of {
 | |
|         n -> { 2 }
 | |
|         True -> { 1 }
 | |
|         False -> { 0 }
 | |
|     }
 | |
| }
 |