Short idl script using Kelly 2007 code