The calc_scale function computes the scaling factor to transform the average shape (that is, the first column of shape_model::V) to one with a width of width. Once the reference shape r is defined, training the set of patch models can be done with a single function call: