fortran-euita.blogspot.com
Fortran: marzo 2011
http://fortran-euita.blogspot.com/2011_03_01_archive.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Este es otro método para resolver sistemas de ecuaciones similar al de GAUSS. Real, allocatable: A(:,:),L(:,:),U(:,:),b(:),x(:),y(:). Write(*,*)'introduce la dimension de la matriz A'. Allocate(A(n,n),L(n,n),U(n,n),b(n),x(n),y(n), stat=Ierr). If (Ierr 0) stop. Write(*,*)'introduce los elementos de la matriz'. Write(*,*)'introduce las componentes del vector de soluciones'. Call LU1(A,b,x,y,det).
fortran-euita.blogspot.com
Fortran: Metodo de Gauss
http://fortran-euita.blogspot.com/2011/03/metodo-de-gauss.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Este es un método empleado para resolver sistemas de ecuaciones, en nuestro caso marices. Real,allocatable: A(:,:),b(:),x(:). Integer: Ierr,n,i,j. Write(*,*)'introduce la dimension de la matriz'. If (Ierr 0) stop. Write(*,*)'introduce los elementos de la matriz'. Write(*,*)'introduce las componentes del vector de soluciones'. Call Gauss1(A,b,x). Subroutine GAUSS1(A,b,x). Integer: i,j,k,n.
fortran-euita.blogspot.com
Fortran: Derivada centrada
http://fortran-euita.blogspot.com/2011/03/derivada-centrada.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Subo este método de derivación puesto que es el mas optimo. Como veréis lo subo de dos formas distintas, elegid la que os parezca mas cómoda. Como veréis incluye la segunda derivada. Real: x,h,DERI,DERI2. Write(*,*)'¿en que punto hacemos la derivada? Write(*,*)'¿cuantas veces repetimos la 1º derivada? Write(*,*)'¿cuantas veces repetimos la 2º derivada? Call derivada(f1,x,h,n,DERI). Plantilla Awe...
fortran-euita.blogspot.com
Fortran: Metodo LU
http://fortran-euita.blogspot.com/2011/03/metodo-lu.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Este es otro método para resolver sistemas de ecuaciones similar al de GAUSS. Real, allocatable: A(:,:),L(:,:),U(:,:),b(:),x(:),y(:). Write(*,*)'introduce la dimension de la matriz A'. Allocate(A(n,n),L(n,n),U(n,n),b(n),x(n),y(n), stat=Ierr). If (Ierr 0) stop. Write(*,*)'introduce los elementos de la matriz'. Write(*,*)'introduce las componentes del vector de soluciones'. Call LU1(A,b,x,y,det).
fortran-euita.blogspot.com
Fortran: Método de los trapecios
http://fortran-euita.blogspot.com/2011/03/metodo-de-los-trapecios.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Método de los trapecios. Otro método de aproximación de la integral mediante la suma de pequeños trapecios. Real: Xi,Xd,n,I. Write(*,*)'elige un intervalo de integracion'. Write(*,*)'el intervalo es:',Xi,Xd. Write(*,*)'elige un numero de subintervalos'. Call integral(f1,Xi,Xd,n,I). Write(*,*)'el area de la integral es:',I. Subroutine integral(f,a,b,n,I). Real,intent(inout): a,b,n.
fortran-euita.blogspot.com
Fortran: Método de la Bisección
http://fortran-euita.blogspot.com/2011/03/metodo-de-la-biseccion.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Método de la Bisección. Real: Xi,Xd,Xm,epsilon. Write(*,*)'elige la tolerancia'. Write(*,*)'elige el intervalo'. Write(*,*)'el intervalo es:',Xi,',',Xd. Call biseccion(f1,Xi,Xd,Xm,epsilon). Write(*,*)'el valor de la raiz es:'. Subroutine biseccion(f,a,b,Xm,Tol). Real,intent(inout): a,b,Tol. Xm=( a b)/2.0). S=( f(a) *(f(Xm) ). F1=( x* 3) (4*(x* 2) -10). Enviar por correo electrónico.
fortran-euita.blogspot.com
Fortran: Método de Simpson
http://fortran-euita.blogspot.com/2011/03/metodo-de-simpson.html
Actualizaciones casi todas las semanas. Se ha producido un error en este gadget. Viernes, 25 de marzo de 2011. Este es un método empleado para la aproximación de integrales de funciones. Real: Xi,Xd,I. Write(*,*)'elige un intervalo de integracion'. Write(*,*)'elige el numero de repeticiones de la integral'. Call SIMPSON(Xi,Xd,n,I,f). Write(*,*)'por el metodo de simpson la integral es:'. SUBROUTINE SIMPSON(a,b,n,I,F). INTEGER : j,k. INTEGER, INTENT(IN): n. REAL : h,I1,I2. REAL, INTENT(IN) : a,b.
lggt540android.blogspot.com
Lg GT540: marzo 2011
http://lggt540android.blogspot.com/2011_03_01_archive.html
Martes, 22 de marzo de 2011. La compañía coreana LG es otra de las múltiples compañías de telefonía movil que se han sumado al barco de Android. No tiene un gran número de dispositivos con este sistema operativo pero sin duda el nuevo LG GT540(Optimus) funciona de maravilla con este sistema. La cámara del móvil es de 3 megapixels. La pantalla es de 3 pulgadas con una resolución de 320*480, además la pantalla es rotativa. Esta pantalla es de presión(no como la del iphone por ejemplo). Ver todo mi perfil.
