#!/bin/sh

awk '
BEGIN {}
/^[0-9] [0-9] [0-9] [0-9]$/{
	for (i=1; i<=NF; i++) {
		pole[NR][i] = $i
	}
}
END {
	for (r=1; r<=4; r++) {
		for (s=1; s<=NR; s++) {
			printf("%s ", pole[s][r]);
		}
		printf("\n");
	}
}
'