/*********************************************************************************************************************************/ /* Created 12-MAY-1988 14:23:18 by VAX-11 SDL V3.0-1 Source: 12-MAY-1988 14:22:40 DUA0:[BRIAN.DECUS.EXAMPLES.MANDELZOOM]STRUC */ /*********************************************************************************************************************************/ /*** MODULE _structs ***/ /* */ /* Header definition */ /* */ %REPLACE hdr_k_version BY 1; /* Current version of the program */ %REPLACE hdr_k_length BY 512; /* Size of this structure */ DCL 1 hdrdef BASED , 2 hdr_l_version bit(32) aligned, /* Version of the program that wrote this file */ 2 hdr_f_center_r float binary(24), /* Center point, real part */ 2 hdr_f_center_i float binary(24), /* Center point, imaginary part */ 2 hdr_f_scale_r float binary(24), /* Scale, real part */ 2 hdr_f_scale_i float binary(24), /* Scale, imaginary part */ 2 hdr_l_hsize bit(32) aligned, /* Horizontal size in pixels */ 2 hdr_l_vsize bit(32) aligned, /* Vertical size in pixels */ 2 hdr_q_time bit(64) aligned, /* Time/date when image was computed */ 2 hdr_l_pixel_size bit(32) aligned, /* Bytes per pixel */ 2 hdr_l_max_value bit(32) aligned; /* Maximum pixel value */ /* */ /* Color table definition */ /* */ DCL 1 ctbldef BASED , 2 ctbl_b_red bit(8) aligned, /* Red component */ 2 ctbl_b_grn bit(8) aligned, /* Green component */ 2 ctbl_b_blu bit(8) aligned, /* Blue component */ 2 ctbl_b_spare bit(8) aligned; /* Spare, to fill out structure to a longword */