function plotyy3(X1a,Y1a,style1a, X1b, Y1b, style1b, label1,X2a, Y2a, style2a,X2b, Y2b, style2b,label2, fignum); %input with



% X1a=lonc;
% Y1a=llZZ(1:63);
% style1a='b-';
% 
% X1b=lonc;
% Y1b=lcZZ(1:63);
% style1b='r-';
% label1='Vertically and Jet Core Averaged Geopotential Height Variance (m^2)';
% 
% 
% X2a=lon2;
% Y2a=lEAD2;
% style2a='b--';
% 
% X2b=lon2;
% Y2b=cEAD2;
% style2b='r--';
% label2='Jet core Averaged Eady Growth Rate';
% 
% fignum=7;


%adds style to plotyy
figure(fignum); clf;
[AX,H1a,H2a] = plotyy(X1a,Y1a,X2a,Y2a);

set(AX(1), 'YLim', [min([min(Y1a) min(Y1b)])-.05*std(Y1a)  max([max(Y1a) max(Y1b)])+.05*std(Y1a)]);
set(AX(2), 'YLim', [min([min(Y2a) min(Y2b)])-.05*std(Y2a)  max([max(Y2a) max(Y2b)])+.05*std(Y2a)]);

set(get(AX(1),'Ylabel'),'String',label1, 'Color', char(style1a(1,1)), 'FontSize', 20) %sets the labels
set(AX(1),'XColor',char(style1a(1,1)),'YColor',char(style1a(1,1)), 'FontSize', 20)
    
set(get(AX(2),'Ylabel'),'String',label2, 'Color', char(style2a(1,1)), 'FontSize',20)
set(AX(2),'XColor',char(style2a(1,1)),'YColor',char(style2a(1,1)), 'FontSize', 20)  

%B=axis;
hold on
[AX,H1b,H2b] = plotyy(X1b,Y1b,X2b,Y2b);

set(AX(1), 'YLim', [min([min(Y1a) min(Y1b)])-.05*std(Y1a)  max([max(Y1a) max(Y1b)])+.05*std(Y1a)]);
set(AX(2), 'YLim', [min([min(Y2a) min(Y2b)])-.05*std(Y2a)  max([max(Y2a) max(Y2b)])+.05*std(Y2a)]);

%axis(B);

 

    

LW=2;

set(H1a,'LineStyle',char(style1a(1,2:length(style1a))), 'Color', char(style1a(1,1)), 'LineWidth', LW)
set(H2a,'LineStyle',char(style2a(1,2:length(style2a))), 'Color', char(style2a(1,1)), 'LineWidth', LW)
set(H1b,'LineStyle',char(style1b(1,2:length(style1b))), 'Color', char(style1b(1,1)), 'LineWidth', LW)
set(H2b,'LineStyle',char(style2b(1,2:length(style2b))), 'Color', char(style2b(1,1)), 'LineWidth', LW)


set(get(AX(1),'Ylabel'),'String',label1, 'Color', char(style1a(1,1)), 'FontSize', 20) %sets the labels
set(AX(1),'XColor',char(style1a(1,1)),'YColor',char(style1a(1,1)), 'FontSize', 20)
    
set(get(AX(2),'Ylabel'),'String',label2, 'Color', char(style2a(1,1)), 'FontSize',20)
set(AX(2),'XColor',char(style2a(1,1)),'YColor',char(style2a(1,1)), 'FontSize', 20)  

%legend([H1a H1b H2a H2b], 'LGM VARIANCE', 'MODERN VARIANCE', 'LGM EADY', 'MODERN EADY')
%legend(H1b,'MODERN VARIANCE')
%legend(H2b, 
