; $Id: insput.pro,v 1.2 1997/01/15 03:11:50 ali Exp $
;
; Copyright (c) 1996-1997, Research Systems, Inc.  All rights reserved.
;       Unauthorized reproduction prohibited.
;
;+
; NAME:
;       INSPUT
;
; PURPOSE:
;       Stub for INSPUT.  Displays message saying that insight must be running.
;		Once Insight is restored and running this routine will be replaced by
;		the actual compiled version in the insight save file.
;
; CALLING SEQUENCE:
;       INSPUT
;
; DEVELOPMENT NOTES:
;		- 
;
;------------------------------------------------------------------------------
pro InsPut, $
	arg1,  arg2,  arg3,  arg4,  arg5, $
	arg6,  arg7,  arg8,  arg9,  arg10, $
	arg11, arg12, arg13, arg14, arg15, $
	arg16, arg17, arg18, arg19, arg20, $
	arg21, arg22, arg23, arg24, arg25, $
	_EXTRA=extra

	; Notify user that Insight must be running to use this function
	;
	result = DIALOG_MESSAGE($
		['Insight must be running in order to use InsPut.', $
  		'Please start Insight and try again.'] )
end