PICINPT

{{{ SUBROUTINE PICINPT(PICNM,Z0,KK,DN,ESZ) }}}

CHARACTER*12

PICNM

Name of the image.

It opens and reads the image file.

This can optionally use a template file. They are stored in directory TEMPLATES with extension .RAW.

Passed in.

INTEGER

Z0(2)

Centeral pixel/line of the image

Passed in.

INTEGER

KK

Pixel/line spaceing of the image

Passed in.

INTEGER

DN(-1300:1300,-1300:1300)

Output array -- the DN of the image is loaded into this array

Set in this routine.

INTEGER

ESZ

Passed in.

categorySubroutine