anchor.diff:      ok.
   
   
  -get_arity_mod(Mod) -> 
  +get_arity(mod,Mod) -> 
       [{var,0,'Level'},{atom,0,Mod},{var,0,'Tag'}].
  -get_arity_tag(Tag) -> 
  +get_arity(tag,Tag) -> 
       [{var,0,'Level'},{var,0,'Module'},{atom,0,Tag}].
   get_guard(G, Level) ->
       [{op,0,G,{var,0,'Level'},{integer,0, Level}}].
  
positive.code:     ChNameAst = change_module_name(alog_if_default:default_mod_ast()),
      insert_clauses(ChNameAst, Clauses).
  
  multiply_clauses(Config) ->
      multiply_clauses(Config, [def_clause()]).
  multiply_clauses([{{mod,Mods},Prio, Loggers}|Configs], Acc) ->
      multiply_clauses(Configs, [make_clause_mod(Mods, Prio, Loggers)|Acc]);
  multiply_clauses([{{tag,Tags},Prio, Loggers}|Configs], Acc) ->
      multiply_clauses(Configs, [make_clause_tag(Tags, Prio, Loggers)|Acc]);
  multiply_clauses([], Acc) ->
      Acc.
  
  make_clause_mod(Mod, {Guard,Pri}, Loggers)  ->
      AbsLogs = abstract(Loggers),
      {clause, 0, get_arity_mod(Mod),[get_guard(Guard, Pri)],AbsLogs}.
      
  make_clause_tag(Tag, {Guard,Pri}, Loggers) ->
      AbsLogs = abstract(Loggers),
      {clause, 0, get_arity_tag(tag),[get_guard(Guard, Pri)],AbsLogs}.
  
  % Check config. Modules are loaded?
  
  
negative.code:     [F1|Fs1];
  mdma_transform([], _Ast) -> [].
  
  
  
  mdma_transform_every({function,Line,default_mod_ast,Arity,Clause}, Ast) ->
      NewClause = transform_clause(Clause, Ast),
      {function,Line,default_mod_ast,Arity,NewClause};
  