Matriz2fortran.sed - Historial de revisiones

FJRA en 22:39 3 jun 2009

2009-06-03T22:39:17Z

FJRA en 21:09 24 abr 2008

2008-04-24T21:09:57Z

FJRA en 21:04 24 abr 2008

2008-04-24T21:04:05Z

FJRA en 20:50 24 abr 2008

2008-04-24T20:50:58Z

FJRA en 20:49 24 abr 2008

2008-04-24T20:49:31Z

Página nueva

Script [[sed]] para transformar una matriz texto separada por tabulaciones a una expresión de creación de matriz en fortran, sólo hay que reemplazar al final las dimensiones.

== matriz2fortran.sed ==

#Convierte una matriz por tabs en formato para mathematica

1 i = reshape((/ \&
s/[0-9.][0-9.]*/&d0/g
s/d0e$[-+][0-9]*$d0/d\1/g
s/\t/,/g
$! s/^.*$/\t&, \&/g
$ {
s/^.*$/\t&\/), \&/g
a\
(/n, n/) )
}

== Ejemplo ==

Ejemplo usando [[math2matriz.sed]]:

$ echo "{{1.5,2e4},{3*10^5,4}}" | sed -f math2matriz.sed | sed -f matriz2fortran.sed
= reshape((/ &
1.5d0,2d0e4d0, &
3d0*10d0^5d0,4d0/), &
(/n, n/) )

== Ver también ==

* [[math2matriz.sed]]
* [[Enlaces:sed]]

[[Category:Sed_Scripts]]

← Revisión anterior		Revisión del 21:09 24 abr 2008
Línea 1:		Línea 1:
−	Script [[sed]] para transformar una matriz texto separada por tabulaciones a una expresión de creación de matriz en fortran, sólo hay que reemplazar al final las dimensiones. Devuelve los números con "d0" para expresar doble precisión.	+	Script [[sed]] para transformar una matriz texto separada por tabulaciones a una expresión de creación de matriz en fortran, sólo hay que reemplazar al final las dimensiones. Devuelve los números con ''d0'' para expresar doble precisión. Los números que ya tengan notación científica son cambiados a notación científica con ''d''.

@@ Línea 8: / Línea 8: @@
 i = reshape((/ \&
   s/[0-9.][0-9.]*/&d0/g
-  s/d0e\([-+][0-9]*\)d0/d\1/g
+  s/d0[eEdD]\([-+]\?[0-9]*\)d0/d\1/g
   s/\t/,/g
   $! s/^.*$/\t&, \&/g
@@ Línea 22: / Línea 22: @@
 Ejemplo usando [[math2matriz.sed]]:
-  $ echo "{{1.5,2},{3,4}}" | sed -f math2matriz.sed | sed -f matriz2fortran.sed
+  $ echo "{{1.5,2E-5},{3e4,4}}" | sed -f math2matriz.sed | sed -f matriz2fortran.sed
   = reshape((/ &
-.5d0,2d0, &
+.5d0,2d-5, &
-d0,4d0/), &
+d4,4d0/), &
           (/n, n/) )

@@ Línea 4: / Línea 4: @@
 == matriz2fortran.sed ==
-  #Convierte una matriz por tabs en formato para mathematica
+  #Convierte una matriz por tabs en formato para fortran
 i = reshape((/ \&
@@ Línea 32: / Línea 32: @@
 * [[math2matriz.sed]]
 * [[Enlaces:sed]]
 [[Category:Sed_Scripts]]