rem


rem Preliminary note. If this file has been given the extension .htm for

rem documentation purposes, it must be renamed to scr.bat to enable it 

rem to act as a batch file



rem file scr.bat which performs a series of 4 runs on

rem grids of successivel increasing fineness

rem followed by a fifth start-from-scratch run and a

rem sixth which restarts with the grid and from the phi file

rem of run 4. so as to procure a better converged result



rem initialization of files included in the q1

copy spinxyz0 spinxyz1

copy spinxyzs spinxyz3



rem perform the first coarse-grid run

call se



rem Save the results

ren gxmoni.gif gxmoni1.gif

copy result res1

copy phi phi1



rem Call SPINTO so as to create nphi, i.e. the phi from which the 

rem next run will start and to place in spinxyz1 the nx, ny and nz

rem which are to be used.

call runspin



rem Activate  'goto end', by removing the 'rem' in front of it, 

rem if it is desired to rem terminate at this stage

rem goto end



rem Make the second-stage run, save, call SPINTO, etc

call se

ren gxmoni.gif gxmoni2.gif

copy result res2

copy phi phi2

call runspin



rem Make the third-stage run, save, call SPINTO, etc

call se

ren gxmoni.gif gxmoni3.gif

copy result res3

copy phi phi3

call runspin



rem Make the fourth-stage run, save, call SPINTO, etc

rem goto end

call se

ren gxmoni.gif gxmoni4.gif

copy result res4

copy phi phi4



rem Repeat last run without restart, by using empty spinxyz3

copy spin3emp spinxyz3

call se

ren gxmoni.gif gxmoni5.gif

copy result res5

copy phi phi5



rem Restart from nphi4 run without restart but with 30 sweeps

copy spin3lst spinxyz3

call se

copy result res6

copy phi phi6



goto end

:end