fix remove! and insert! usage

[Ralf Hemmecke]

Hi Waldek,

can I commit the following two patches.

https://github.com/hemmecke/fricas/commit/edbc948243f2413920291a876d2bf7930c1866b2.patch


https://github.com/hemmecke/fricas/commit/bd4d58237169553bdf4c4cab64e29c9484b85c11.patch

Ralf

[Waldek Hebisch]

Yes, please commit.

--
Waldek Hebisch

[oldk1331]

There is an error in:

intersect(s, t) ==
i := set()
- for x in parts s | member?(x, t) repeat insert!(x, i)
+ for x in parts s | member?(x, t) repeat t := insert!(x, i)
i

It should be "i := insert!(x, i)".

> --
> You received this message because you are subscribed to the Google Groups "FriCAS - computer algebra system" group.
> To unsubscribe from this group and stop receiving emails from it, send an email to fricas-devel...@googlegroups.com.
> To post to this group, send email to fricas...@googlegroups.com.
> To view this discussion on the web visit https://groups.google.com/d/msgid/fricas-devel/cc15d9f3-2219-c977-ba36-a2a14682ecb0%40hemmecke.org.
> For more options, visit https://groups.google.com/d/optout.

[Ralf Hemmecke]

On 1/24/19 1:43 PM, oldk1331 wrote:
> There is an error in:
>
> intersect(s, t) ==
> i := set()
> - for x in parts s | member?(x, t) repeat insert!(x, i)
> + for x in parts s | member?(x, t) repeat t := insert!(x, i)
> i
>
> It should be "i := insert!(x, i)".

Yes, of course. Thank you for catching such a stupid mistake.

Ralf