[ot] problemas con fortran

Kuskulinho pscual en hotmail.com
Lun Sep 22 22:39:57 BST 2008


Muchas gracias Mauricio

Ahora mismo miro a ver si me pueden echar una mano

Un saludo

Mauricio J. Adonis C. wrote:
> 
> El lun, 22-09-2008 a las 10:02 -0700, Kuskulinho escribió:
>> Buenas, 
>> 
>> Mi nombre es Pascual, y estoy haciendo un proyecto final de carrera en
>> Linux, pero no sé porqué me cuesta excesivamente comprenderlo.
>> 
>> No sé si me podréis ayudar, pero el proyecto es sobre el tratamiento de
>> matrices, y no entiendo muy bien como usar el READ, porque se supone que
>> tengo tres matrices guardadas en un archivo y quiero asignarle el valor
>> de
>> dichas matrices a otra para poder operar con ellas.
>> 
>> El codigo de una parte sería algo así:
>> 
>>      PROGRAM crsacss
>>       dimension val_css(:), ind_fila_ccs (:), totalnum_ccs (:),
>> ind_col_crs
>> (:)
>>       dimension val_crs (:), totalnum_crs(:)
>>       integer *4 n, x, conta, j, contador, c, l, z, b
>>       n = 1
>>       x = 0
>>       conta = 1
>>       j = 0
>>       c = 1
>>       l = 1
>>       z = 1
>>       b = 1
>> !     Asignar valores del archivo a las matrices
>> !     Tenemos que mirar el orden que tiene el archivo para saber si va
>> así
>>       open (unit = 10, FILE='', Status='old')
>>       read (*,*,*) ind_col_crs, val_crs, totalnum_crs
>> !     Buscamos el valor máximo de columna que tenemos y la guardamos en
>> b
>>       Do x = 0, contador.NE.x, x++
>>         If b < ind_col_crs(x) then
>>           b = ind_col_crs(x)
>>         endif
>>       Enddo
>>       Do n = 1, n.LT.b, n++
>>         Do x = 0, contador.NE.x, x++
>>           If col_ind_crs(x) == n then
>>             val_ccs (j) == val_crs (n)
>>             ind_fila_ccs (j) == 1
>>             j = j + 1
>>           Endif
>>           x = x + 1
>>           If x.EQ.totalnum_crs (z) then
>>             z = z + 1
>>             l = l + 1
>>           Endif
>>         Enddo
>>         totalnum_ccs (c) = conta
>>         c = c + 1
>>         l = 1
>>         z = 1
>>       Enddo
>>      Endprogram
>> 
>> **** tengo el problema que tampoco se ejecutar un programa de
>> fortran/****
>> -- 
>> View this message in context:
>> http://www.nabble.com/-ot--problemas-con-fortran-tp19612249p19612249.html
>> Sent from the ubuntu-es mailing list archive at Nabble.com.
>> 
>> 
> 
> Un saludo cordial Pascual, la lista que estás usando para solicitar
> ayuda está enfocada en Ubuntu específicamente, por lo que probablemente
> vas a encontrar muy pocos expertos en Fortran por aquí. Te sugiero que
> vayas al siguiente sitio que alberga una comunidad activa de
> programadores Fortran.
> 
> http://www.wikilearning.com/comunidad/fortran/378-1
> 
> Al inscribirte podrás recibir ayuda especializada en este lenguaje de
> programación.
> 
> -- 
> Mauricio J. Adonis C. <mike.alfa.2007 en gmail.com>
> 
> 
> -- 
> ubuntu-es mailing list
> ubuntu-es en lists.ubuntu.com
> https://lists.ubuntu.com/mailman/listinfo/ubuntu-es
> 
> 

-- 
View this message in context: http://www.nabble.com/-ot--problemas-con-fortran-tp19612249p19616233.html
Sent from the ubuntu-es mailing list archive at Nabble.com.




Más información sobre la lista de distribución ubuntu-es