User Portlet User Portlet

Discussions
I am new to mathematica and having trouble understanding the syntax. The code: findMax[{b_, w_}, v_] := Min[Select[Join[Table[If[v[[i]] != 0, \[Lambda] /.Solve[(b + w*(0.5 + \[Lambda]*v))[[i]] == 0, \[Lambda]][[1]], -1], {i, 3}], ...