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: pdot0.mcsh,v 1.7 2010/08/12 05:17:28 fetk Exp $" 20### ########################################################################## 21 22############################################################################## 23# File: pdot0.mcsh (batch) 24# 25# Purpose: Initialization script for batch (parallel) use of MC. 26# 27# rcsid="$Id: pdot0.mcsh,v 1.7 2010/08/12 05:17:28 fetk Exp $" 28############################################################################## 29 30############################################################################## 31# EVERYONE: initialization 32############################################################################## 33 34set VMP_F -1 35 36# basic setup 37noio 38set FKEY 0 39set GVAL 1.0 40set GVLO 4x1 41set OSFMT xdr 42 43# adaptivity 44set ETOL 1.0e-3 45set AKEY 2 46set RKEY 0 47set RCOL -1 48 49# solver 50set NKEY 0 51set LKEY 3 52set PREC 2 53set GUES 0 54set LMAX 50 55set NMAX 20 56set LTOL 1.0e-3 57 58# partition 59set PPOW 2 60set PKEY 1 61set PWHT 0 62 63# write/plot 64set PVEC -1 65set CKEY 1 66set DKEY -1 67 68############################################################################## 69# EVERYONE: setup socket graphics and focus partitions 70############################################################################## 71 72set VMP_F 0 73set OSNAM 0 74set RCOL 0 75 76set VMP_F 1 77set OSNAM 1 78set RCOL 1 79 80set VMP_F 2 81set OSNAM 2 82set RCOL 2 83 84set VMP_F 3 85set OSNAM 3 86set RCOL 3 87 88############################################################################## 89# EVERYONE: read-solve-estimate-partition 90############################################################################## 91 92set VMP_F -1 93 94read 95lsolve 96estimate 97part 98writeoff 99 100############################################################################## 101# PROCESS 0: pause 102############################################################################## 103 104set VMP_F 0 105pause 106 107############################################################################## 108# EVERYONE: synchronize 109############################################################################## 110 111set VMP_F -1 112vmp_bar 113 114############################################################################## 115# EVERYONE: estimate-refine-solve-plotsol 116############################################################################## 117 118set VMP_F -1 119 120estimate 121refine 122lsolve 123writeoffdis 124vmp_bar 125 126estimate 127refine 128lsolve 129writeoffdis 130vmp_bar 131 132estimate 133refine 134lsolve 135writeoffdis 136vmp_bar 137 138estimate 139refine 140lsolve 141writeoffdis 142vmp_bar 143 144estimate 145refine 146lsolve 147writeoffdis 148vmp_bar 149 150estimate 151refine 152lsolve 153writeoffdis 154vmp_bar 155 156estimate 157refine 158lsolve 159writeoffdis 160vmp_bar 161 162estimate 163refine 164lsolve 165writeoffdis 166vmp_bar 167 168############################################################################## 169# PROCESS 0: pause 170############################################################################## 171 172set VMP_F 0 173pause 174 175############################################################################## 176# EVERYONE: synchronization barrier 177############################################################################## 178 179set VMP_F -1 180vmp_bar 181exit 182 183