C integer*4 max_col ! maximum number of columns parameter max_col = 100 ! SEE ALSO ARRAY_EDIT integer*4 length ! length of data integer*4 data(2,max_col) ! DSD for up to 100 records common /array_edit_common/ length,data ! common block definition