From: David Brown <caml-list@davidb.org>
To: Caml List <caml-list@inria.fr>
Cc: ijtrotts@ucdavis.edu
Subject: Re: [Caml-list] Array.filter (was Multi-keyed lookup table?)
Date: Sun, 10 Aug 2003 22:48:08 -0700 [thread overview]
Message-ID: <20030811054808.GA13460@davidb.org> (raw)
In-Reply-To: <20030810023435.GA3019@localhost>
On Sat, Aug 09, 2003 at 07:34:35PM -0700, ijtrotts@ucdavis.edu wrote:
> # let filter f a =
> let n = ref 0 in
> for i = 0 to Array.length a - 1 do if f a.(i) then incr n done;
> let k = ref 0 in
> Array.init !n
> (fun i -> while not (f a.(!k)) do incr k done; incr k; a.(!k-1));;
Unfortunately, this calls f twice on each element. If that solution is
not acceptable, then the results of f a.(i) could be cached in some type
of bit array (perhaps in a string), and then that string iterated again.
This function also poorly if f a.(i) isn't really functional, and
returns different results. For example:
List.filter (fun _ -> Random.bool) data
will return roughly half of the items, randomly. This would cause array
bounds problems about half the time with the above code.
Dave Brown
-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
next prev parent reply other threads:[~2003-08-11 5:48 UTC|newest]
Thread overview: 23+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-08-07 19:41 [Caml-list] Multi-keyed lookup table? Matt Gushee
2003-08-07 20:16 ` Brian Hurt
2003-08-07 21:49 ` Yaron Minsky
2003-08-07 22:26 ` John Max Skaller
[not found] ` <D4DBD8568F05D511A1C20002A55C008C11AC05E6@uswaumsx03medge.med.ge.com>
2003-08-08 21:30 ` Matt Gushee
2003-08-08 22:13 ` Brian Hurt
[not found] ` <005d01c35e51$7c927200$6628f9c1@zofo>
2003-08-09 16:57 ` [Caml-list] Array.filter (was Multi-keyed lookup table?) Matt Gushee
2003-08-09 18:48 ` ijtrotts
2003-08-10 19:53 ` Michal Moskal
2003-08-10 2:34 ` ijtrotts
2003-08-11 5:48 ` David Brown [this message]
2003-08-10 18:53 ` ijtrotts
2003-08-10 20:23 ` Marcin 'Qrczak' Kowalczyk
2003-08-10 2:37 ` ijtrotts
[not found] ` <200308102222.16369.qrczak@knm.org.pl>
2003-08-10 20:43 ` Michal Moskal
2003-08-10 21:59 ` Ville-Pertti Keinonen
2003-08-10 20:55 ` [Caml-list] Array.filter Jean-Baptiste Rouquier
2003-08-11 9:46 ` Michal Moskal
2003-08-10 22:29 ` [Caml-list] Array.filter (was Multi-keyed lookup table?) Shawn Wagner
2003-08-11 11:51 ` [Caml-list] Multi-keyed lookup table? Remi Vanicat
2003-08-07 22:19 ` John Max Skaller
2003-08-12 6:34 ` Florian Hars
2003-08-12 9:58 ` Michael Wohlwend
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20030811054808.GA13460@davidb.org \
--to=caml-list@davidb.org \
--cc=caml-list@inria.fr \
--cc=ijtrotts@ucdavis.edu \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox