Added example program. Not tested