procedure Ortho_Gcc.Main;