*! 1.0.0 NJC 19 July 1998    STB-50 dm69
program def matcfm
* matrices conformable for multiplication?
* matcfm `1' `2'
    version 5.0
    if "`1'" == "" | "`2'" == "" | "`3'" != "" {
        di in r "invalid syntax"
        exit 198
    }
    tempname C
    mat `C' = `1' * `2'
end