3
# This file is part of Rheolef.
5
# Copyright (C) 2000-2009 Pierre Saramito
7
# Rheolef is free software; you can redistribute it and/or modify
8
# it under the terms of the GNU General Public License as published by
9
# the Free Software Foundation; either version 2 of the License, or
10
# (at your option) any later version.
12
# Rheolef is distributed in the hope that it will be useful,
13
# but WITHOUT ANY WARRANTY; without even the implied warranty of
14
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
# GNU General Public License for more details.
17
# You should have received a copy of the GNU General Public License
18
# along with Rheolef; if not, write to the Free Software
19
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21
# -------------------------------------------------------------------------
23
TOP_SRCDIR=${TOP_SRCDIR-"../.."}
24
DATADIR=$TOP_SRCDIR/nfem/ptst
25
NPROC_MAX=${NPROC_MAX-"3"}
26
. "${TOP_SRCDIR}/config/loop_mpirun.sh"
30
# geo err_P1 err_P2 err_P3
32
line-bdry-v2 6e-2 4e-5 2e-5
33
carre-bamg-v2 2e-1 8e-4 6e-5
34
carre-bamg-q-dom-v2 4e-2 9e-5 3e-6
35
carre-tq-10-dom-v2 2e-1 6e-4 5e-5
36
cube-dom-v2 2e-0 4e-2 8e-3
37
cube-H-6-dom-v2 7e-1 3e-3 3e-4
38
cube-P-5-dom-v2 9e-1 7e-3 1e-3
39
my_cube_TP-5-v2 2e-0 3e-2 6e-3
40
my_cube_PH-5-v2 2e-0 9e-3 2e-3
41
my_cube_TPH-5-v2 2e-0 2e-2 4e-3
44
while test "$L" != ""; do
45
geo=`echo $L | awk '{print $1}'`
46
L=`echo $L | awk '{for (i=2; i <= NF; i++) print $i}'`
47
for Pk in P1 P2 P3; do
48
err=`echo $L | awk '{print $1}'`
49
L=`echo $L | awk '{for (i=2; i <= NF; i++) print $i}'`
50
loop_mpirun "./neumann-nh $DATADIR/$geo $Pk 2>/dev/null | RHEOPATH=$DATADIR $RUN ./sinusprod_error $err 2>/dev/null >/dev/null"
51
if test $? -ne 0; then status=1; fi