Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Probando Unas Funciones Externas Del API De GMP
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Probando Unas Funciones Externas Del API De GMP 
 
Estaba probando un simple código gambas con unas funciones externas de la libreria GMP.

Library "libgmp:10.1.3"

Public Struct __mpz_struct
  _mp_alloc As Integer
  _mp_size As Integer
  _mp_d As Pointer
End Struct

' int __gmpz_init_set_str (mpz_t rop, const char *str, int base)
' Initialize rop.
Private Extern __gmpz_init_set_str(rop As __mpz_struct, st As String, base As Integer) As Integer

' void __gmpz_init (mpz_ptr x)
' Initialize x, and set its value to 0
Private Extern __gmpz_init(x As __mpz_struct)

' void __gmpz_mul (mpz_t rop, const mpz_t op1, const mpz_t op2)
' Set rop to op1 times op2.
Private Extern __gmpz_mul(rop As __mpz_struct, op1 As __mpz_struct, op2 As __mpz_struct)

' int __gmp_printf (const char *, ...)
' Accept format strings similar to the standard C printf
Private Extern __gmp_printf(ris As String, mpz_ptr As __mpz_struct, mpz_ptr As __mpz_struct, mpz_ptr As __mpz_struct) As Integer

' void __gmpz_clear (mpz_t x)
' Free the space occupied by x.
Private Extern __gmpz_clear(x As __mpz_struct)


Public Sub Main()

  Dim x, y, res As New __mpz_struct

    __gmpz_init_set_str(x, "8723169365849056", 10)
    __gmpz_init_set_str(y, "7374602239540192", 10)
    __gmpz_init(res)
    
    __gmpz_mul(res, x, y)
    
    __gmp_printf("                %Zd *\n" &
            "                %Zd\n" &
            "--------------------------------\n" &
            "%Zd\n", x, y, res)
    
' Memoriam terminando vacuam facit:
    __gmpz_clear(x)
    __gmpz_clear(y)
    __gmpz_clear(res)

End

Referencias:
https://gmplib.org/manual/


Existe tambien el Componente gb.gmp creado de los recursos de esta libreria, pero prefiero el código extremo.    
bunge-20jumping-2002
 



 
última edición por vuott el Sabado, 02 Abril 2016, 17:31; editado 4 veces 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Probando Unas Funciones Externas Del API De GMP 
 
Vuott:


Uffff..... por alguna razón crei leer GIMP


No sabia que era GMP,... lo acabo de leer en https://en.wikipedia.org/wiki/GNU_M...thmetic_Library
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Probando Unas Funciones Externas Del API De GMP 
 
juer.... tengo lectura para dias...
 



 
arubioc - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 0 invitados
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario