Advertisement
Guest User

Untitled

a guest
Jul 3rd, 2015
188
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.09 KB | None | 0 0
  1. Do[If[X[a, b]*Y[a, b + r] <= -1, Print[a, " ", b]], {a, 0, 1, 0.1}, {b, -1, 0, 0.1}]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement