pdsolve2(y(p_,t_)+y(q_,x_)^n_+d_,y_):= if(hasnot(d,t) and hasnot(d,y),if(p>1,dsolve(y(q,x)^n+d,y)+C_1*t, dsolve(y(q,x)^n+d-1,y)-t^p/p! ));

 
pdsolve2(y(p_,t_)+y(q_,x_)+d_,y_):= if(hasnot(d,y), pdsolve(y(p,t)+y(q,x),y)+psolution(1,q,0,d,y,t,x,p), 
	if(p==q,if(hasnot(d,t),replace(replace(dsolve(-d/2,y,x,q),C_1,C_1+t),c_1,c_1+t),  
	if(has(d,x),replace(dsolve(-d/2,y,x,q),C_1,C_1+t), replace(dsolve(-d/2,y,x,q),x,C_2*(t+x)))),
	if(q>1,dsolve(-d,y,t,p),
	if(p>1,dsolve(-d,y,x,q),
	dsolve(1-d,y,x,q)-t^p/p! ))));
pdsolve2(y(p_,t_)+b_*y(q_,x_)+d_,y_):= if(hasnot(b,d,y), pdsolve(y(p,t)+b*y(q,x),y)+psolution(b,q,0,d,y,t,x,p),
	if(p==q,if(hasnot(b,d,t),if(b+1==0, replace(dsolve(-d,y,x,p),x,2^(1/p)*t+x), replace(dsolve(-d,y,x,q),x,(t+x)/(1+b)^(1/p)) ),
	if(has(d,x),replace(dsolve(-d/(1+b),y,x,q),C_1,C_1+t),replace(dsolve(expand(-d/(1+b)),y,x,q),x,C_2*(t+x)))), 
	if(q>1,dsolve(-d,y,t,p),
	if(p>1,dsolve(-d/b,y,x,q),
	dsolve(1-d/b,y,x,q)-t^p/p! ))));
pdsolve2(a_*y(p_,t_)+y(q_,x_)+d_,y_):= if(hasnot(a,d,y), if(hasnot(a,x),C_1*(int(1/a,t,p)-x^q/q!),0)
	+if(hasnot(a,t),C_1*(t^p/p!-int(a,x,q)),0)+gsolution(0,y,t,p)+gsolution(0,y,x,q)
	+if(has(d/a,t),if(has(d/a,x), psolution(1/a,q,0,d/a,y,t,x,p), -int(d/a,t,p) ), -int(d,x,q) ), 
	if(hasnot(d,t), dsolve(-d,y,x,q)) );
pdsolve2(a_*y(p_,t_)+b_*y(q_,x_)+d_,y_):= if(hasnot(a,b,d,y), if(q<0,dsolve(d(a,x,-q)*y(p,t)+b*y+d(d,x,-q)),
	if(hasnot(a,x) and hasnot(b,t),C_1*(int(1/a,t,p)-int(1/b,x,q)),0)
	+if(hasnot(a,t) and hasnot(b,x),C_1*(int(b,t,p)-int(a,x,q)),0)
	+gsolution(0,y,t,p)+gsolution(0,y,x,q)
	+if(has(d/b,t),if(has(d/b,x), psolution(b/a,q,0,d/a,y,t,x,p), -int(d/a,t,p) ), -int(d/b,x,q) )), 
	if(hasnot(d/b,t), dsolve(-d/b,y,x,q)) );

pdsolve2(a_+y(p_,t_)+z1_+z2_,y_):=dsolve(-a,y,t,p);

pdsolve2(y(p_,t)=b_,y_):=if(hasnot(b,y),if(p>1,ode(b,y)+c_1*t,dsolve(b-1,y)-t^p/p!));
pdsolve2(a_):=pdsolve2(replace(toy(a),y(x),y),y);