process -L -D -o '_a _b c' -r '_a:a _b:b' -m '
	rd;
	$c = 1;
	($_a, $_b) = ($a, $b);
	while (rd) {
		if (not $a eq $_a && $b eq $_b) {
			pr;
			$c = 1;
			($_a, $_b) = ($a, $b)
		}
		else
		{
			$c++
		}
	} 
	pr
'
