Law-abiding Apply NonEmptyList that agrees with Apply List

[UnrelatedString]

Description of the change

Rewrote the faulty

instance applyNonEmptyList :: Apply NonEmptyList where
  apply (NonEmptyList (f :| fs)) (NonEmptyList (a :| as)) =
    NonEmptyList (f a :| (fs <*> a : Nil) <> ((f : fs) <*> as))

to

instance applyNonEmptyList :: Apply NonEmptyList where
  apply (NonEmptyList (f :| fs)) (NonEmptyList (a :| as)) =
    NonEmptyList (f a :| map f as <> apply fs (a : as))

and likewise for the lazy equivalent. The majority of the commits were adding massively-overkill test machinery because I couldn't actually think of an example of how this failed to obey the Apply law without randomly generating one, but this can safely be removed (and I will gladly do so, or even make a new PR from a branch without those commits, if asked) because the single new test

log "apply should agree with Apply List"
  assert $ l (Tuple <$> nel 1 [2, 3, 4] <*> nel 'a' ['b', 'c', 'd']) == (Tuple <$> l [1, 2, 3, 4] <*> l ['a', 'b', 'c', 'd'])

should suffice.

...I also accidentally included the contents of my earlier PR #220,

---

Checklist:

• Added the change to the changelog's "Unreleased" section with a reference to this PR (e.g. "- Made a change (#0000)")
• Linked any existing issues or proposals that this pull request should close
• Updated or added relevant documentation
• Added a test for the contribution (if applicable)

[UnrelatedString]

...also realized there are personal tweaks to the CI in there that weren't supposed to be in ANY PR. oops