solve[(P1*V1)/T1 = (P2*V2)/T2, T1]