anchor.diff:  date(Input, _FormatStr) when is_list(Input) ->
       io:format("Unexpected date parameter : ~p~n", [Input]),
       "".
  +%% @doc format a date given in unix-epoch seconds.
  +%% Input is seconds since 1-1-1970. 
  +%%% offset is calendar:datetime_to_gregorian_seconds({{1970,1,1},{0,0,0}}), the difference between 
  +%%% gregorian calendar and unix epoch.
  +date_unix_epoch(Input) ->
  +    date(Input + 62167219200).
   
   %% @doc If value evaluates to `false', use given default. Otherwise, use the value.
   default(Input, Default) ->
  
positive.code: %% @doc Returns a plural suffix if the value is not 1. By default, this suffix is 's'.
  pluralize(Number, Suffix) when is_binary(Suffix) ->
      pluralize_io(Number, binary_to_list(Suffix) );
  pluralize(Number, Suffix) when is_list(Suffix) ->
      pluralize_io(Number, Suffix).
  
  
negative.code: 
  %% @doc When used without an argument, rounds a floating-point number to one decimal place
  %% -- but only if there's a decimal part to be displayed
  floatformat(undefined, _) ->
      "undefined";
  floatformat(Number, Place) when is_binary(Number) ->
      floatformat(binary_to_list(Number), Place);
  floatformat(Number, Place) when is_list(Number) ->
      floatformat(list_to_float(Number), Place);
  floatformat(Number, Place) ->
      floatformat_io(Number, cast_to_integer(Place)).
  
  