Arrow model values are computed by applying a quotation to the value of another model.

arrow

<arrow> ( model quot -- arrow )