DATASET ACTIVATE DataSet3.
GLM warm kind sophist BY pa
  /METHOD=SSTYPE(3)
  /INTERCEPT=INCLUDE
  /PLOT=PROFILE(pa)
  /PRINT=DESCRIPTIVE ETASQ TEST(SSCP) HOMOGENEITY
  /CRITERIA=ALPHA(.05)
  /DESIGN= pa.

MANOVA
warm kind sophist BY pa(1,3)
/PRINT		HOMOGENEITY (BOXM)
		ERROR (SSCP COV COR)
		SIGNIF (MULTIV EIGEN HYPOTH STEPDOWN)
/DISCRIM RAW STAN COR
/CINTERVAL MULTIVARIATE (WILKS).