Filling the area within the three lines with color

close all
clear all 
clc
a=2; %a link length
b=5; %b link length
P1=[0,0];
axis([-2,7,-2,3]); 


    theta=pi/2; 
    alfa=asin(a*sin(theta)/b);
    P2=a*[cos(theta),sin(theta)]; 
    P3=[(a*cos(theta)+b*cos(alfa)),0]; 
    crank=line([P1(1),P2(1)],[P1(2),P2(2)]); 
    slider=line([P2(1),P3(1)],[P2(2),P3(2)]); 
    ground=line([P1(1),P3(1)],[P1(2),P3(2)]);
   
   

How do I fill the area inside the Crank-Slider-Ground lines with color?

Answer 1

[Berke Ogulcan Parlak]

Thank you, but in the case of 90 <theta <270, I can't get results. (F.e. Theta = 100 deg)