File: doit

package info (click to toggle)
tela 1.28-2
  • links: PTS
  • area: main
  • in suites: slink
  • size: 6,596 kB
  • ctags: 5,519
  • sloc: ansic: 14,013; cpp: 13,376; lex: 1,651; fortran: 1,048; yacc: 834; sh: 715; makefile: 464
file content (15 lines) | stat: -rw-r--r-- 393 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
/*
 * This file is part of tela the Tensor Language.
 * Copyright (c) 1994-1996 Pekka Janhunen
 */

#!/bin/sh
#
for i in t*.C
do
	echo "$i:"
	sed -e 's/a\.x/a.RealValue()/g' <$i | sed -e 's/b\.x/b.RealValue()/g' >$i.1
	sed -e 's/a\.i/a.IntValue()/g' <$i.1 | sed -e 's/b\.i/b.IntValue()/g' >$i
	sed -e 's/a\.z/a.ComplexValue()/g' <$i | sed -e 's/b\.z/b.ComplexValue()/g' >$i.1
	mv $i.1 $i
done