display_surface.pro

来自「本手册主要向读者介绍IDL在图像处理方面的强大功能。包括如何显示、控制影像和进行」· PRO 代码 · 共 16 行

;-------------------------------------------------------
;显示格网表面

pro display_surface
    on_error,2

    MARBELLSTEMPLATE = BINARY_TEMPLATE(filepath('surface.dat',subdir = ['examples','data']))
    MARBELLS_BINARY = READ_BINARY(filepath('surface.dat',subdir = ['examples','data']),$
              TEMPLATE=MARBELLSTEMPLATE)
    A = congrid(MARBELLS_BINARY.A, 35, 45)
    surface, A
end

;------------------------------------------------------------