#!/usr/bin/fish

# Copyright (C) 2019 Tim Düsterhus
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <https://www.gnu.org/licenses/>.

for algo in *
	if [ ! -d "$algo" ]
		continue
	end
	
	pushd $algo
	for k in *
		if [ ! -d "$k" ]
			continue
		end
		: > static_{$k}
		for file in $k/*
			join -a1 -a2 -e' ' -oauto -t\t static_{$k} (begin; jq -s 'map(.cluster_changes | to_entries | map(select(.value != 0)) | length / '$k') | .[]' < $file |nl ; end |psub) |sponge static_$k
		end
	end
	popd
end
