Solve[{a*Log[(4.6*10^(-7)*x*a)/(m*c)] + ((1 - a))*Log[(1/(m*n))((3.196*10^(-8)*x*((1 - a))))] + a*((1 - a))*(-4260)/(8.31*1273) == 0, a*Log[(9.27*10^(-5)*a*y)/(v*c)] + ((1 - a))*Log[(1/(v*n))((3.19*10^(-8)*y*((1 - a))))] + a*((1 - a))*(-4260)/(8.31*1273) == 0, a* Log[(1/(t*c))((4.22*10^(-7)*a*((1 - x - y))))] + ((1 - a))*Log[(1/(t*n))((5.09*10^(-10)*((1 - x - y))*((1 - a))))] + a*((1 - a))*(-4260)/(8.31*1273) == 0, y*a*Log[(x*v*4.6*10^(-7))/(y*m*9.27*10^(-5))] + ((1 - x - y))*((1 - a))* Log[((m*((1 - x - y))*5.09*10^(-10)))/((x*t*3.196*10^(-8)))] + ((1 - a))* Log[(1/(m*n))((x*((1 - a))*3.19*10^(-7)))] + a^2*((1 - a))*(-4260)/(8.31*1273) == 0, 0.000137 == x*f/2 + ((1 - f))*m, 0.000337 == y*f/2 + ((1 - f))* v, 0.0000142 == ((1 - x - y))* f/2 + ((1 - f))*t, 0.0074 == a*f/2 + ((1 - f))*c, 0.00013 == ((1 - a))* f/2 + ((1 - f))*n}, {m, v, t, c, n, x, y, a, f}])