1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
# Bourne shell script: p2C
# Gets array sizes for the def.r file
# P.J.Gawthrop Feb 2000
# Copyright (C) 2000 by Peter J. Gawthrop
#$Id$
if [ "$2" = "xx" ]; then
n=`mtt_getsize $1 x`
N=`echo "$n * $n" | bc`
else
N=`grep "MTTN$2 " <$1_def.r | awk '{print $3}' | sed 's/;//'`
fi
|
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
# Bourne shell script: mtt_getsize
# Gets array sizes for the def.r file
# P.J.Gawthrop Feb 2000
# Copyright (C) 2000 by Peter J. Gawthrop
#$Id$
while [ -n "`echo $1 | grep '^-'`" ]; do
case $1 in
-internal )
internal=yes;
;;
*)
echo "$1 is an invalid argument - ignoring";
exit ;;
esac
shift
done
if [ -n "$internal" ]; then
grep "MTT$2[^(]" $1_ese.r | wc -l
exit
fi
## The original version for external sizes.
if [ "$2" = "xx" ]; then
n=`mtt_getsize $1 x`
N=`echo "$n * $n" | bc`
else
N=`grep "MTTN$2 " <$1_def.r | awk '{print $3}' | sed 's/;//'`
fi
|