;
; Constants used by the Safire system
;
CONST:  m1     =       5;
CONST:  m2     =       4;
CONST:  m3     =       3;
CONST:  mm     =   m2*m3;
;
DREAL:  arr1     : m1 = {0.0,1.0,2.0,3.0,4.0};
;
REAL:   arr2     : m1,m2 = {0.0,0.1,0.2,0.3,0.4,\
                            1.0,1.1,1.2,1.3,1.4,\
                            2.0,2.1,2.2,2.3,2.4,\
                            3.0,3.1,3.2,3.3,3.4};
;
REAL:   arr3     : m1,m2,m3 = {0.00,0.01,0.02,0.03,0.04,0.10,0.11,0.12,0.13,0.14,\
                               0.20,0.21,0.22,0.23,0.24,0.30,0.31,0.32,0.33,0.34,\
                               1.00,1.01,1.02,1.03,1.04,1.10,1.11,1.12,1.13,1.14,\
                               1.20,1.21,1.22,1.23,1.24,1.30,1.31,1.32,1.33,1.34,\
                               2.00,2.01,2.02,2.03,2.04,2.10,2.11,2.12,2.13,2.13,\
                               2.20,2.21,2.22,2.23,2.24,2.30,2.31,2.32,2.33,2.34};

GROUP:agroup:arr1,arr2,arr3,m1;