919 Commits

Author SHA1 Message Date
Grzegorz Kowal
24c261afb5 Use variables from COORDINATES in module SCHEME. 2012-07-27 16:06:27 -03:00
Grzegorz Kowal
20b300ab74 Use variables from COORDINATES in module MESH.
Remove dependency on module CONFIG.
2012-07-27 16:02:07 -03:00
Grzegorz Kowal
b01ddcf0ad Prepare block indices in initialize_coordinates(). 2012-07-27 16:01:01 -03:00
Grzegorz Kowal
c8f0383fc0 Update comments in finalize_coordinates(). 2012-07-27 15:14:05 -03:00
Grzegorz Kowal
91fb4324be Rewrite initialize_coordinates().
The coordinate dimensions and bounds have been moved to module
COORDINATES.  In the rewritten subroutine initialize_coordinates() the
block dimensions and domain bounds are obtained from module PARAMETERS,
and then all other module variables are initialized.
2012-07-27 15:10:31 -03:00
Grzegorz Kowal
36e821c27e Set the 3rd block dimension only if NDIMS==3. 2012-07-27 13:14:48 -03:00
Grzegorz Kowal
eb4b41ecbd Rename init_mesh() to initialize_mesh(). 2012-07-27 10:34:19 -03:00
Grzegorz Kowal
3fb472d760 Move domain bounds to module COORDINATES.
Also rename init_coords() to initialize_coordinates(), and
clear_coords() to finalize_coordinates().
2012-07-23 22:43:23 -03:00
Grzegorz Kowal
2a5e9bc89b Rename init_blocks() and clear_blocks() and describe them. 2012-07-22 22:47:25 -03:00
Grzegorz Kowal
ff60bb681c Rename module COORDS to COORDINATES. 2012-07-22 22:26:51 -03:00
Grzegorz Kowal
48c40f19da Update makefile after the coords.F90 to coordinates.F90 rename. 2012-07-22 22:18:47 -03:00
Grzegorz Kowal
183ac6affd Rename file coords.F90 to coordinates.F90. 2012-07-22 22:16:04 -03:00
Grzegorz Kowal
3d7a74f61d Copy module RANDOM from GODUNOV and make it working. 2012-07-22 19:37:58 -03:00
Grzegorz Kowal
77d9e511c1 Initialize and finalize module PARAMETERS in the main program. 2012-07-22 19:32:21 -03:00
Grzegorz Kowal
3e9ff91f5a Add new module to handle parameter files.
This module is 100% compatible with the module from GODUNOV code.
Another step to reduce differences between those codes.
2012-07-22 19:22:07 -03:00
Grzegorz Kowal
515c82d435 Rewrite module MPITOOLS and adopt the rest to the changes.
Another step of reducing differences between the AMUN and GODUNOV codes.
2012-07-22 19:01:27 -03:00
Grzegorz Kowal
0da52f7aec Rewrite module TIMERS to be compatible with Godunov version. 2012-07-22 15:46:56 -03:00
Grzegorz Kowal
64a098c9bb Rename module TIMER to TIMERS.
Rename internal array timers(:) to times(:) to not conflict with the
module name.
2012-07-22 12:59:15 -03:00
Grzegorz Kowal
080aa4c7b1 Update makefile after timer.F90 to timers.F90 rename. 2012-07-22 12:51:42 -03:00
Grzegorz Kowal
7f6293ad32 Rename file timer.F90 to timers.F90. 2012-07-22 12:50:27 -03:00
Grzegorz Kowal
dbfbabc613 Change the license to GNU General Public License version 3. 2012-07-22 12:30:20 -03:00
Grzegorz Kowal
05dc326d3d Change compiler flag from EKO to PATHSCALE. 2011-06-18 10:16:45 -03:00
Grzegorz Kowal
02594822af Fix signal handling for all compilers. 2011-06-17 20:21:10 -03:00
Grzegorz Kowal
94a11094c9 Fix print formating for compilers (Pathscale, Intel, PGI, and GNU). 2011-06-17 20:05:15 -03:00
Grzegorz Kowal
f3e03ca8ad Allow to compile with EKOPath compiler. 2011-06-13 16:58:39 -03:00
Grzegorz Kowal
fb8f3e2da4 Reorganize variable indices in variables.F90. 2011-06-12 00:56:06 -03:00
Grzegorz Kowal
970293c024 Fix compilation with PGI compilers. 2011-06-10 19:23:02 -03:00
Grzegorz Kowal
d18174a567 Make at least one interation of the forcing. 2011-06-10 19:00:45 -03:00
Grzegorz Kowal
6922c8140c Complete the printed line with spaces. 2011-06-10 18:13:23 -03:00
Grzegorz Kowal
29071a00fc Add 'fixed' boundary conditions for the reconnection problem. 2011-06-10 18:04:08 -03:00
Grzegorz Kowal
1abbafed99 Allow for gradual introduction of the forcing term.
- the new parameter tbfor determines the time when the forcing starts
   to be introduced gradually; the parameter tefor determines at what
   time the forcing operates with the full power; the transition between
   tbfor and tefor is described by sinus function;
2011-06-10 15:46:40 -03:00
Grzegorz Kowal
3af808978d Improve MP reconstructions according to ZhiWei et al. (2010).
- ZhiWei et al. (2010) replaced equation to calculate flc in the
   original paper by Suresh & Huynh (1997); this resulted in a scheme
   free from Gibbs phenomenon;

 - they also suggested to calculate parameter alpha from cfl;
2011-06-09 18:37:59 -03:00
Grzegorz Kowal
65cde9f9d7 Use eps returned by epsilon() in the MP reconstruction. 2011-06-09 16:17:06 -03:00
Grzegorz Kowal
07b1e8c92d Improve function minmod4(). 2011-06-09 14:47:59 -03:00
Grzegorz Kowal
214ca3a457 Improve function minmod(). 2011-06-09 14:12:33 -03:00
Grzegorz Kowal
707b0ff503 Store Psi potential in the HDF5 files when GLM-MHD is used. 2011-06-08 21:32:14 -03:00
Grzegorz Kowal
a5e146b2db Rewrite subroutine write_variables_h5().
- the primitive variables in the 'p' file are stored now with single
   precision;

 - the subroutine has been also rewritten in order to simplify it;
2011-06-08 21:24:17 -03:00
Grzegorz Kowal
eb19e3ea2f Add a subroutine to store a 4D single precision array.
- subroutine write_array4_float_h5() stores a 4D single precision array
   in the HDF5 file;
2011-06-08 21:05:45 -03:00
Grzegorz Kowal
f613d52ff3 Declare block bounds as real, not double precision values. 2011-06-07 20:59:16 -03:00
Grzegorz Kowal
f9f6984988 Change the returned signal from 9 to 15 in terminate(). 2011-06-07 18:13:41 -03:00
Grzegorz Kowal
773a391d63 Rework signals so they work on GNU and INTEL compilers. 2011-06-07 17:29:03 -03:00
Grzegorz Kowal
14e58a4369 Pass COMPILER flag to the compilation options.
- this allows for use preprocessor to compile incompatible parts;
2011-06-07 16:51:52 -03:00
Grzegorz Kowal
ccf2dc3216 Replace carriage return '\r' with char(13). 2011-06-07 16:50:17 -03:00
Grzegorz Kowal
b27b478911 Simplify signal handling to work better with GNU Fortran.
- move termination flag iterm to module CONFIG;

 - simplify subroutine 'terminate';
2011-06-07 16:47:28 -03:00
Grzegorz Kowal
ba7dd3c7ba Change argument name from msecs to csecs in timer_to_time(). 2011-06-07 14:41:56 -03:00
Grzegorz Kowal
6b01c5fdae Terminate a job after a specified execution time.
- two new parameters trun and tsav control how long the job can run;
   the parameter trun, expressed in hours, determines the maximum
   execution time and the parameter tsav, expressed in minutes, tells
   when to terminate the job before the execution time exceeds trun;
2011-06-07 14:34:54 -03:00
Grzegorz Kowal
a16a6024b5 Improve calculation and printing of the execution time. 2011-06-07 10:05:32 -03:00
Grzegorz Kowal
e875c991ef Print the execution time in days, hours, minutes, and seconds. 2011-06-07 01:05:42 -03:00
Grzegorz Kowal
dc8a5830a4 Implement job restart with decrease of maxlev.
- in some rare situations we want to restart a job with the maximum
   refinement level decreased; this change implements this feature; the
   blocks are read with the previous range of refinement levels, but
   after the first mesh update all blocks which lay on levels higher
   than maxlev are automatically derefined;
2011-06-06 18:39:17 -03:00
Grzegorz Kowal
e5e265bbe5 Add new parameter for the top level.
- the new parameter toplev stores the level of refinement larger or
   equal to maxlev; this level cannot be set in the config.in, but is
   determined during the initiation or restarting the job;

 - several subroutines have been updated to use toplev instead of
   maxlev;
2011-06-06 17:31:51 -03:00