data blocos;
input trat$ 1-14 bloco MS;
cards;
MSE (Original)     1       62.66
MSE (Original)     2      145.98
MSE su 1 nic 8     1       41.04
MSE su 1 nic 8     2       76.70
MSE su 2 nic 8     1      104.61
MSE su 2 nic 8     2      107.26
MSE su 3 nic 8     1      169.79
MSE su 3 nic 8     2      124.54
MSE su 4 nic 8     1      129.04
MSE su 4 nic 8     2      154.60
MSE su 5 nic 8     1      101.01
MSE su 5 nic 8     2      164.25
MSE su 6 nic 8     1       88.99
MSE su 6 nic 8     2       89.16
MSE su 7 nic 8     1       51.84
MSE su 7 nic 8     2       90.16
MSE su 8 nic 8     1      114.87
MSE su 8 nic 8     2      170.22
MSE su 9 nic 8     1       37.01
MSE su 9 nic 8     2       73.49
;

proc print;
title 'Dados originais';
run;

proc glm;
title 'Análise de variância e comparação das linhagens com a original';
  class trat bloco;
  model MS = trat bloco;
  means trat/DUNNETT ('MSE (Original)');
run;