{**********************************************************************}
{ Clear screen using library function					}
{**********************************************************************}

procedure cls;
begin
    clear_screen; 			{ Clear memory 	}
end;