Skip to content

Commit bcd15a3

Browse files
committed
minor change in rhs to improve performance
1 parent 3a620a0 commit bcd15a3

File tree

1 file changed

+1
-1
lines changed
  • src/+otp/+arenstorf

1 file changed

+1
-1
lines changed

src/+otp/+arenstorf/f.m

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3,6 +3,6 @@
33
D1= ((y(1)+m1)^2+y(2)^2)^(3/2);
44
D2= ((y(1)-m2)^2+y(2)^2)^(3/2);
55

6-
dy = [y(3);y(4);y(1)+2*y(4)-m2/D1*(y(1)+m1)-m1/D2*(y(1)-m2);y(2)-2*y(3)-m2/D1*y(2)-m1/D2*y(2)];
6+
dy = [y(3:4);y(1)+2*y(4)-m2/D1*(y(1)+m1)-m1/D2*(y(1)-m2);y(2)-2*y(3)-m2/D1*y(2)-m1/D2*y(2)];
77

88
end

0 commit comments

Comments
 (0)