Main prog