C Practica 2 C Ejemplo simple de m‚todo de iteracion de un punto C utilizando doble precision C declaracion impl¡cita (todas las variables que empiecen con z son de doble precision) implicit double precision (z) C Definicion de la funci¢n (debe ir al principio del programa) zg(zx)=5.d00*(1.d00-DEXP(-zx)) C vemos que la funcion exponencial en doble precision a¤adimos DEXP C Las constantes en doble precision 2.d00 , a continuacion de la d es el exponente de 10, 2x10**0 C Definici¢n de la condicion inical (p. ej, x=2) zx=2.d00 C Definicion del numero de iteraciones (p. ej. n=10) n=10 C repite la iteracion do i=1,n zx=zg(zx) write(*,2)i,zx C El Write(*,2) indica escritura por pantalla con el formato que lleva la etiqueta 2. end do C El formato indica una variable entera de dos digitos (i2), saltar dos espacios (2x) C y utilizar 20 espacios para represntar una variable con 13 decimales. 2 format(i2,2x,d20.13) stop end C Sugerencia Probar con distintas funciones g(x) C Practica 2 C Ejemplo simple de metodo de iteracion de un punto C utilizando doble precision y escritura con formato. C Curso de m‚todos Matematicos VI C Justo R. P‚rez Cruz C Facultad de F¡sica C Universidad de La Laguna.