data; param N := 50000; param M := 100; param P := 100;