+ r[i] = v[i];
+ r[N] = s;
+ return r;
+}
+
+template<typename T, unsigned N, unsigned M>
+inline Vector<T, N+M> compose(const Vector<T, N> &v1, const Vector<T, M> &v2)
+{
+ Vector<T, N+M> r;
+ for(unsigned i=0; i<N; ++i)
+ r[i] = v1[i];
+ for(unsigned i=0; i<M; ++i)
+ r[N+i] = v2[i];
+ return r;
+}
+
+template<typename T, unsigned N>
+template<unsigned M>
+inline Vector<T, M> Vector<T, N>::slice(unsigned j) const
+{
+ Vector<T, M> r;
+ for(unsigned i=0; i<M; ++i)
+ r[i] = (*this)[j+i];
+ return r;