anchor.diff:  
   now_3339(Time) -> now_3339(Time, 0).
   
  -now_3339(secs, diff) ->
  -    Secs = epoch(secs) + diff,
  +now_3339(secs, Diff) ->
  +    Secs = epoch(secs) + Diff,
       case ets:lookup(nklib_date, date) of
           [{date, Secs, Secs3339}] ->
               <<Secs3339/binary, $Z>>;
  
positive.code:             Date
      end;
  
  now_3339(msecs, diff) ->
      Now = epoch(msecs) + diff,
      Secs = Now div 1000,
      case ets:lookup(nklib_date, date) of
          [{date, Secs, Secs3339}] ->
  
negative.code:             Date
      end;
  
  now_3339(usecs, Diff) ->
      Now = epoch(usecs) + Diff,
      Secs = Now div 1000000,
      case ets:lookup(nklib_date, date) of
          [{date, Secs, Secs3339}] ->
  