chapter04sfunction.pro

idl 可视化分析与应用（随书程序）

; Chapter04SFunction.pro
PRO Chapter04SFunction
READ, PROMPT='请输入X = ?', x
IF  x LE 0 THEN  BEGIN
    y = 5 * x ^ 2 + 9
ENDIF  ELSE  BEGIN
    y = 5 * x ^ 2 - 9
ENDELSE
    PRINT, 'y = ',  y
END