anchor.diff:  code_change(_OldVsn,State,_Extra) ->
     {ok,State}.
   
  +handle_call(state,_From,State) ->
  +  {reply,expand_recs(State),State};
   handle_call(unlink,_From,State) ->
     {links,Links} = process_info(self(),links),
     lists:foreach(fun unlink/1,Links),
  
positive.code: -export([init/1,terminate/2,code_change/3,
           handle_call/3,handle_cast/2,handle_info/2]).
  
  start() ->
    application:start(?MODULE).
  
  
negative.code: -author('mats cronqvist').
  
  %% the API
  -export([start/0,stop/0,state/0,unlink/0]).
  
  %% for application supervisor
  -export([start_link/0]).
  