Re: [Solar-general] Liberando código QBASIC. ..
José
jose.masson en gmail.com
Jue Oct 28 16:29:19 CEST 2004
Che Grardo... pero como es el tema... ?... por lo que entiendo esa
rutina (QuickSort) puede interpretarse como una "tecnica".... es
posible patentar "tecnicas" o formas de hacer algo???
Se que actualmente en la UE se está luchando contra eso.. pero acá en
Argentina como está el tema?
Perdón por la ignarancia
Abrazos
José
--
Rebeldes Stereotipos
Domingos 20-22 Hs FM BA 89.1MHz (San Isidro)
www.ba89.com.ar <-- Escuchanos ON-Line!
**************************************************
PuertoRock.com.ar
www.puertorock.com.ar
**************************************************
Chevyfierro.com
www.chevyfierro.com
**************************************************
UTUTO-e GNU + Linux - 100% Libre!!!
http://e.ututo.org.ar
**************************************************
On Thu, 28 Oct 2004 10:16:56 -0300, Gerardo Díaz
<gerardobdiaz en arnet.com.ar> wrote:
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
>
> Perdón por contestarme a mí mismo, pero mirá a quién encontré :-(
>
> - --begin quote--
>
> http://research.microsoft.com/fse/asml/samples/QuickSort/QuickSort.asml.content.html
>
> Copyright (C) Microsoft Corporation. All rights reserved.
> 1. Quicksort
>
> Here is Hoare's quicksort using sequence comprehensions:
>
> bar(xs as Seq of Integer) as Seq of Integer
> ~ return xs
> qsort(s as Seq of Integer) as Seq of Integer
> ~ if s = [] then
> ~ return []
> ~ else
> ~ pivot = Head(s)
> ~ rest = Tail(s)
> ~ return qsort([y | y in rest where y < pivot]) +
> ~ [pivot] +
> ~ qsort([y | y in rest where y >= pivot])
>
> A sample main program sorts the Sequence [7, 8, 2, 42] and prints the
> result:
>
> Main()
> ~ WriteLine(ToString(qsort([7, 8, 2, 42])))
>
> The call to ToString is just to work around a current problem in the
> AsmL2 compiler.
>
> Gerardo Díaz wrote:
> |
> |
> | Ignacio Vissani wrote:
> | | El autor de Quicksort es C.A.R.Hoare (Wikipedia!)
> | |
> |
> | Ténquiu (acabo de poner el crédito correspondiente en la
> | rutina y un display por pantalla cuando `sorteo', quedó
> | re-pituco)
> |
> |
>
> - --
> - --
> Gerardo Díaz
> - -----------------
> Asociáte a SOLAR!
> Software Libre Argentina
> http://www.solar.org.ar/breve.php3?id_breve=78
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.0.2 (GNU/Linux)
> Comment: For info see http://www.gnupg.org
>
> iD8DBQFBgPEkLHLbx9ffmf8RAmlvAJ443t8xCliMBZMCSKRL3uUCxv0QbACglgeF
> 7v0hW9UxM0Bf3dDNZjR8z6E=
> =CMo5
>
>
> -----END PGP SIGNATURE-----
>
> _______________________________________________
> Solar-general mailing list
> Solar-general en lists.ourproject.org
> http://lists.ourproject.org/cgi-bin/mailman/listinfo/solar-general
>
Más información sobre la lista de distribución Solar-general