anchor.diff:  	[{M,F,A} || 
   		M1 <- LFuns, 
   		{{M,F,A},_,_} <- M1, 
  -		A == Ar].
  +		A == Ar]. 
   
   -define(MAX_PERMS, 5).
   
  
positive.code: 		gen_magic_wrappers_(I+1, Perm, Vars, FS, MFA)].
  
  gen_magic_wrapper_func_name(UFunc, M, F, I) ->
  	[$', UFunc, "_m_", M, "_f_", F, $_, to_s(I), $'].
  
  gen_magic_wrapper_spec(I, {Func, TStr}, {M, F, _A}) ->
  	["-spec ",
  
negative.code: gen_magic_wrappers({Func, Str, A}, {M,F,A}) ->
  	Vars = [["V",to_s(I)] || I <- lists:seq(1,A)],
  	Perm = perms(Vars),
  	gen_magic_wrappers_(?FIRST_FN, Perm, Vars, 
  		{to_s(Func), Str}, 
  		{to_s(M), to_s(F), A}).
  
  