restrshapeGPCM produces the restricted shape matrix for the 14 GPCM

`GAMc=restrshapeGPCM(lmd, Omega, SigmaB, niini, pa)`

example

The purpose of this routine is to produce the constrained shape matrix $\Gamma$.

This routine copes with the second of the 3 letters of modeltype. It deals with the cases in which the second letter is E, or I or V. If the second letter is V procedure restrshapecore is invoked and both (within groups) cshw, and (between groups) cshb constraints are imposed. If the second letter of modeltype is E just cshw is used. If the second letter is I, GAMc becomes a matrix of ones.

Garcia-Escudero L.A., Mayo-Iscar, A. and Riani M. (2020). Model-based clustering with determinant-and-shape constraint, Statistics and Computing, vol. 30, pp. 1363–1380, https://link.springer.com/article/10.1007/s11222-020-09950-w

Garcia-Escudero L.A., Mayo-Iscar, A. and Riani M. (2022). Constrained parsimonious model-based clustering, Statistics and Computing, vol. 32, https://doi.org/10.1007/s11222-021-10061-3