function Pext=Apply_External_Loading(Nodes,Ndofs)

Pext=zeros( Ndofs,1);
Nnodes=size(Nodes,2);

for inode=1:Nnodes
    iload=Nodes{inode}.iload;
    
    %Ean o komvos exei fortio
    if iload==1
        %Tote pare to dianysma fortisis tou komvou (Des arxeio input)
        Pext_node=Nodes{inode}.Pext;
        ndof=size(Pext_node,1);
        %kai gia kathe vathmo eleftherias tou komvou
        for idof=1:ndof
            %des se poio vathmo eleftherias tis kataskevis antistoixei
            aStructureDof=Nodes{inode}.index(idof);
            %Kai vale to fortio afto stin antistoixi thesi tou dianysmatos
            %tis kataskevis
            Pext(aStructureDof,1)=Pext_node(idof,1);
        end
        
    end
    
end

end