Guest User

Untitled

a guest
Jan 21st, 2018
81
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.31 KB | None | 0 0
  1. test[x_, y_, z_]:= Total@Log[DeleteCases[Chop[{x, y, z, 1 - x - y - z}], 0]]
  2.  
  3. In[2]:= test[x, y, z] /. {x -> 0.5622814903606034,
  4. y -> 0.21885925481969834, z -> 0.21885925481969834}
  5. Out[2]= -41.0444 + 3.14159 I
  6.  
  7. In[3]:= test[0.5622814903606034, 0.21885925481969834, 0.21885925481969834]
  8. Out[3]= -3.61441
Add Comment
Please, Sign In to add comment