program define sturng6
#delimit ;
if `1' { matrix StuRng61 = (
   .21066903, .01590246, -.00285674, .00013836 \
   .20655531, .01408584, -.00272481, .00014544 \
   .20243607, .01236247, -.00264172, .00015611 \
   .19831355, .0107292,  -.0026022,  .00016913 \
   .19419836, .00916957, -.00259478, .00018255 \
   .19011211, .00765224, -.00260227, .00019395 \
   .18607286, .00615257, -.00261193, .00020211)
};
else { matrix StuRng60 = (
   .65313286, .12503229, -.03554646, .00281221 \
   .45387074, .09948076, -.02466564, .00178751 \
   .36307028, .0801641,  -.01812427, .00121947 \
   .31801039, .06239261, -.01263132, .00073802 \
   .28767475, .05455163, -.01078289, .00063134 \
   .27102694, .04448576, -.00793943, .00038205 \
   .25778407, .03915058, -.00677654, .00031069 \
   .24830341, .03472848, -.00584769, .0002548 \
   .24104449, .03128253, -.00519696, .00022362 \
   .23546939, .02829487, -.00461514, .00019027 \
   .2309415,  .02587711, -.00417511, .00016716 \
   .22715858, .02393478, -.00385728, .00015395 \
   .22396336, .0223287,  -.00361704, .00014616 \
   .22123803, .02096811, -.00342691, .00014117 \
   .21888521, .01980261, -.00327417, .00013803 \
   .21683078, .01879752, -.00315126, .00013632 \
   .21501963, .01792527, -.0030524,  .00013575 \
   .2134089,  .01716444, -.00297314, .00013608 \
   .21196708, .01649523, -.00290897, .00013701 \
   .21066903, .01590246, -.00285674, .00013836)
};
end;