! *********************************************************************************************************************************
!  Created 12-MAY-1988 14:23:01  by  VAX-11 SDL V3.0-1     Source: 12-MAY-1988 14:22:40 DUA0:[BRIAN.DECUS.EXAMPLES.MANDELZOOM]STRUC 
! *********************************************************************************************************************************
 
 
!*** MODULE _structs ***
! 
! 	Header definition
! 
	PARAMETER hdr_k_version = '00000001'X	!  Current version of the program
	PARAMETER hdr_k_length = '00000200'X	!  Size of this structure
	STRUCTURE /hdrdef/
	    INTEGER*4 hdr_l_version			!  Version of the program that wrote this file
	    REAL*4    hdr_f_center_r		!  Center point, real part
	    REAL*4    hdr_f_center_i		!  Center point, imaginary part
	    REAL*4    hdr_f_scale_r			!  Scale, real part
	    REAL*4    hdr_f_scale_i			!  Scale, imaginary part
	    INTEGER*4 hdr_l_hsize			!  Horizontal size in pixels
	    INTEGER*4 hdr_l_vsize			!  Vertical size in pixels
	    INTEGER*4 hdr_q_time(2)			!  Time/date when image was computed
	    INTEGER*4 hdr_l_pixel_size		!  Bytes per pixel
	    INTEGER*4 hdr_l_max_value		!  Maximum pixel value
	END STRUCTURE	! hdrdef
                         ! 
                         ! 	Color table definition
                         ! 
	STRUCTURE /ctbldef/
	    BYTE      ctbl_b_red			!  Red component
	    BYTE      ctbl_b_grn			!  Green component
	    BYTE      ctbl_b_blu			!  Blue component
	    BYTE      ctbl_b_spare			!  Spare, to fill out structure to a longword
	END STRUCTURE	! ctbldef