Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 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