Re: New IDL User Questions

["Liam Gumley" <Liam.Gumley(at)ssec.wisc.edu>]

"John Piccirillo" <jpicciri@radiancetech.com> wrote in message
news:<f6WJ6.8403$2B6.790502@e420r-chi2.usenetserver.com>...
>       b.     ;blow-up image X 9 For Screen Display
>  For j = 0,84 Do Begin
>        For i = 0,199 Do Begin
>   JImage[3*i,3*j]         = ImageS[i,j,[4]]
>   JImage[3*i,3*j+1]     = ImageS[i,j,[4]]
>   JImage[3*i,3*j+2]     = ImageS[i,j,[4]]
>   JImage[3*i+1,3*j]     = ImageS[i,j,[4]]
>   JImage[3*i+1,3*j+1] = ImageS[i,j,[4]]
>   JImage[3*i+1,3*j+2] = ImageS[i,j,[4]]
>   JImage[3*i+2,3*j]     = ImageS[i,j,[4]]
>   JImage[3*i+2,3*j+1] = ImageS[i,j,[4]]
>   JImage[3*i+2,3*j+2] = ImageS[i,j,[4]]
>       EndFor
>  EndFor
>
>       I don't use the EXPAND function because I don't want to interpolate
> the data.

Let IMDISP do the work:

http://cimss.ssec.wisc.edu/~gumley/imdisp.html

Cheers,
Liam.
http://cimss.ssec.wisc.edu/~gumley/