function[Wij,bj,Wjk,bk]=ParamsParse1(Params,I,J,K);
counter=1;
Wij=zeros(J,I);
bj=zeros(J,1);
Wjk=zeros(K,J);
bk=zeros(K,1);
%Wkl=zeros(L,K);
%b3=zeros(L,1);
for j=1:J
     for i=1:I
         Wij(j,i)=Params(counter);
         counter=counter+1;
     end
end
for m=1:J
    bj(m,1)=Params(counter);
         counter=counter+1;
end
for k=1:K
     for j=1:J
         Wjk(k,j)=Params(counter);
         counter=counter+1;
     end
end
for n=1:K
    bk(n,1)=Params(counter);
         counter=counter+1;
end