program define sturng2
#delimit ;
if `1' { matrix StuRng21 = (
   .54657632, .02993201, -.01038611, .00076661 \
   .54589528, .02825789, -.01023268, .00077042 \
   .54517758, .02666597, -.01014073, .00078081 \
   .54440051, .02518912, -.01012371, .00079859 \
   .54353791, .02386304, -.01019446, .00082396 \
   .54257321, .0227062,  -.01035535, .00085497 \
   .5415253,  .02167795, -.01057782, .00088425)
};
else { matrix StuRng20 = (
   .70355052, .11851965, -.0341988,  .00268685 \
   .60681427, .09640203, -.02657619, .00199721 \
   .57917988, .07926683, -.02150665, .00155629 \
   .56719905, .06784222, -.01839978, .00129871 \
   .56084919, .0597881,  -.01634642, .00113623 \
   .55704492, .05384168, -.01491295, .00102792 \
   .55455816, .04930137, -.01387457, .00095321 \
   .55282754, .04573712, -.0130997,  .0009003 \
   .55155921, .04288052, -.01250934, .00086226 \
   .55059177, .04054931, -.01205136, .00083459 \
   .54982811, .03861869, -.01169096, .00081432 \
   .54920977, .03699778, -.01140353, .00079942 \
   .54869622, .03562322, -.01117248, .00078854 \
   .54826218, .03444531, -.01098499, .00078066 \
   .54788798, .03342833, -.01083207, .00077509 \
   .54756188, .03254255, -.01070635, .00077124 \
   .54727316, .03176724, -.01060309, .0007688 \
   .54701668, .03108182, -.01051699, .00076731 \
   .54678518, .03047453, -.01044571, .00076666 \
   .54657632, .02993201, -.01038611, .00076661)
};
end;