$img_mirror->flip( dir => "v" );  ## "h"

##</code><code>##

#make a unified image


#~__ my $img_uni =  Imager->new(xsize=>$pos_width * 2,ysize=>$global_ascent,channels=>4);


#~__ $img_uni->paste(left=>$pos_width,top=>0,img=>$img1);

#~__ $img_uni->paste(left=>0,top=>0,img=>$img_mirror);


my $img_uni =  Imager->new(xsize=>$pos_width ,ysize=>$global_ascent * 2,channels=>4);

$img_uni->paste(left=>0,top=>$global_ascent,img=>$img_mirror);
$img_uni->paste(left=>0,top=>0,img=>$img1);

##</code><code>##

  A  \ \        / |                                        _ _|  __ \
<-|-> \ \  \   /  __ \   _ \  __| _ \     _` | __ `__ \      |      /
  V    \ \  \ /   | | |  __/ |    __/    (   | |   |   |     |    _|
        \_/\_/   _| |_|\___|_|  \___|   \__,_|_|  _|  _|   ___|   _)
        /"\/"\   "| |"|/"""|"|  /"""|   /""`"|"|  "|  "|   """|   ")
  A    / /  / \   | | |  ""\ |    ""\    (   | |   |   |     |    "|
<-|-> / /  /   \  "" /   " /  ""| " /     ", | "" ,"" /      |      \
  v  / /        \ |                                        " "|  "" /