1### ##########################################################################
2### MC = < Manifold Code >
3### Copyright (C) 1994-- Michael Holst
4###
5### This library is free software; you can redistribute it and/or
6### modify it under the terms of the GNU Lesser General Public
7### License as published by the Free Software Foundation; either
8### version 2.1 of the License, or (at your option) any later version.
9###
10### This library is distributed in the hope that it will be useful,
11### but WITHOUT ANY WARRANTY; without even the implied warranty of
12### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13### Lesser General Public License for more details.
14###
15### You should have received a copy of the GNU Lesser General Public
16### License along with this library; if not, write to the Free Software
17### Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18###
19### rcsid="$Id: p.mcsh,v 1.5 2010/08/12 05:17:27 fetk Exp $"
20### ##########################################################################
21
22##############################################################################
23# File:     p.mcsh (batch)
24#
25# Purpose:  Parallel computing mcsh script.
26#
27# rcsid="$Id: p.mcsh,v 1.5 2010/08/12 05:17:27 fetk Exp $"
28##############################################################################
29
30# basic setup
31set FKEY 1
32set GVAL 1.0
33
34# adaptivity
35set ETOL 1.0e-3
36set AKEY 2
37set RKEY 0
38set RCOL -1
39
40# solver
41set NKEY 0
42set LKEY 5
43set GUES 0
44set LMAX 50
45set NMAX 20
46set LTOL 1.0e-3
47
48# partition
49set PPOW 2
50set PKEY 1
51set PWHT 0
52
53# write/plot
54set PVEC -1
55set CKEY 1
56set DKEY -1
57set FKEY 1
58set GVAL 1.0
59
60##############################################################################
61# initialization
62##############################################################################
63
64# read-plotmesh-solve-plotsol-pause
65read
66set OSNAM 0
67writeoff
68lsolve
69set OSNAM 1
70writeoffdis
71pause
72
73# estimate-partition-plotmesh-pause
74estimate
75part
76set OSNAM 0
77writeoff
78pause
79
80# reset and focus now on one partition
81set RCOL 1
82
83##############################################################################
84# the rest is "estimate-refine-plotmesh-solve-plotsol-pause"
85##############################################################################
86
87# estimate-refine-plotmesh-solve-plotsol-pause
88estimate
89refine
90set OSNAM 0
91writeoff
92lsolve
93set OSNAM 1
94writeoffdis
95#
96set FKEY 0
97set GVAL 0.7
98set OSNAM 2
99writeoffdis
100set FKEY 1
101set GVAL 1.0
102#
103pause
104
105# estimate-refine-plotmesh-solve-plotsol-pause
106estimate
107refine
108set OSNAM 0
109writeoff
110lsolve
111set OSNAM 1
112writeoffdis
113#
114set FKEY 0
115set GVAL 0.7
116set OSNAM 2
117writeoffdis
118set FKEY 1
119set GVAL 1.0
120#
121pause
122
123# estimate-refine-plotmesh-solve-plotsol-pause
124estimate
125refine
126set OSNAM 0
127writeoff
128lsolve
129set OSNAM 1
130writeoffdis
131#
132set FKEY 0
133set GVAL 0.7
134set OSNAM 2
135writeoffdis
136set FKEY 1
137set GVAL 1.0
138#
139pause
140
141# estimate-refine-plotmesh-solve-plotsol-pause
142estimate
143refine
144set OSNAM 0
145writeoff
146lsolve
147set OSNAM 1
148writeoffdis
149#
150set FKEY 0
151set GVAL 0.7
152set OSNAM 2
153writeoffdis
154set FKEY 1
155set GVAL 1.0
156#
157pause
158
159# estimate-refine-plotmesh-solve-plotsol-pause
160estimate
161refine
162set OSNAM 0
163writeoff
164lsolve
165set OSNAM 1
166writeoffdis
167#
168set FKEY 0
169set GVAL 0.7
170set OSNAM 2
171writeoffdis
172set FKEY 1
173set GVAL 1.0
174#
175pause
176
177