function ROUT = umordner(RE)

RUP(2:9,1:101)=RE(4:11,1:101);
RE(2:3,1:101)=RE(10:11,1:101);
RE(10:11,1:101)=zeros;