change generic bimap to: generic bimap a b | bimap b a :: .a ->.b

frontend/syntax.dcl

@@ -657,7 +657,6 @@ NoGlobalIndex :== {gi_module=NoIndex,gi_index=NoIndex}
 
 :: GenericTypeRep = 
 	{ gtr_type :: GenTypeStruct		// generic structure type
-	, gtr_iso  :: !DefinedSymbol	// the conversion isomorphism
 	, gtr_to   :: !DefinedSymbol
 	, gtr_from :: !DefinedSymbol
 	}
@@ -1161,8 +1160,6 @@ cNotVarNumber :== -1
 					| TVI_Kind !TypeKind
 					| TVI_ConsInstance !DefinedSymbol //AA: generic cons instance function 
 					| TVI_Normalized !Int /* MV - position of type variable in its definition */
-					| TVI_Expr !Bool !Expression	/* AA: Expression corresponding to the type var during generic specialization */
-					| TVI_Iso !DefinedSymbol !DefinedSymbol !DefinedSymbol
 					| TVI_GenTypeVarNumber !Int
 					| TVI_TypeVarArgN !Int // type argument number in module backendconvert
 					| TVI_Attr !TypeAttribute

frontend/syntax.icl

@@ -827,7 +827,6 @@ where
 	(<<<) file (TVI_PropClass _ _ _) 	= file <<< "TVI_PropClass"
 	(<<<) file (TVI_TypeKind kind_info_ptr) = file <<< "TVI_TypeKind " <<< (ptrToInt kind_info_ptr)
 	(<<<) file (TVI_Kind kind) 			= file <<< "TVI_Kind" <<< kind
-	(<<<) file (TVI_Expr is_bimap_id expr) = file <<< "TVI_Expr " <<< is_bimap_id <<< ' ' <<< expr
 
 instance <<< AttrVarInfo
 where