#!/usr/bin/perl

$zero = 1136073600;
$adjust = -1;
while (<>) {
	($timet, $val) = split;
	next unless ($val eq "0" || $val eq "1");
	if ($lasttimet > $timet) {
		$adjust++;
	}
	$relative = sprintf("%0.6f", $timet + $adjust - $zero);
	print "$timet\t$relative\t$val\n";
	$lasttimet = $timet;
}