program define sturng1 #delimit ; if `1' { matrix StuRng11 = ( .91056693, .0905643, -.0306423, .00247216 \ .9111864, .09025075, -.03063082, .00247742 \ .91177672, .08999655, -.03065594, .0024872 \ .91231114, .08984117, -.03073467, .00250316 \ .91275227, .08983757, -.0308878, .00252687 \ .91306072, .09003472, -.03113016, .0025581 \ .91324443, .09039963, -.03143097, .00258826) }; else { matrix StuRng10 = ( .87926501, .11943337, -.03830202, .00313082 \ .88533199, .10597296, -.03445005, .00277883 \ .89256507, .10092353, -.03310847, .00265952 \ .89707816, .09831089, -.03242582, .00259976 \ .90006202, .09665348, -.03199541, .00256276 \ .90217602, .09547228, -.03169158, .0025373 \ .90375638, .09457215, -.03146408, .00251886 \ .9049859, .09385741, -.03128785, .00250517 \ .90597129, .09327511, -.03114875, .00249489 \ .90677834, .09279253, -.03103765, .00248717 \ .90744954, .09238952, -.03094913, .00248151 \ .90801907, .09204584, -.03087698, .00247727 \ .90850574, .09175296, -.03081891, .00247427 \ .90892541, .09150257, -.03077263, .00247229 \ .90929061, .09128678, -.0307356, .00247107 \ .90961099, .09109948, -.03070602, .00247045 \ .90989339, .09093719, -.03068297, .00247035 \ .9101432, .0907969, -.03066571, .00247071 \ .91036808, .09067118, -.03065152, .00247124 \ .91056693, .0905643, -.0306423, .00247216) }; end;