function LepOut=Lep(A_metric,B_metric,Gs,FrameL);

LepOut=zeros(1,FrameL);

for i=1:FrameL
    
     max1=ACSO_Le(A_metric(1,i),B_metric(3,i),A_metric(2,i),B_metric(1,i));
     
     max2=ACSO_Le(A_metric(3,i),B_metric(4,i),A_metric(4,i),B_metric(2,i));
     
     max3=ACSO_Le(A_metric(1,i),B_metric(1,i),A_metric(2,i),B_metric(3,i));
     
     max4=ACSO_Le(A_metric(3,i),B_metric(2,i),A_metric(4,i),B_metric(4,i));
     
     sum1=max1+Gs(i);
     
     delta=sum1-max2;
     
     correctfactor=log(1+exp(-(abs(delta))));

     if(delta>=0)
         max11=sum1+correctfactor;
     else 
         max11=max2+correctfactor;
     end
     
     sum2=max4+Gs(i);
     
     delta=max3-sum2;
     
     correctfactor=log(1+exp(-(abs(delta))));

     if(delta>=0)
          max22=max3+correctfactor;
     else 
          max22=sum2+correctfactor;
     end
     
     LepOut(i)=max11-max22;
 end