/*
 * $Id$
 */
/*
   sx_Descend()
*/
#include "sixapi.ch"

#include "simpleio.ch"

PROCEDURE MAIN()

   LOCAL cString := "Harbour"

   ? sx_Descend( cString )