KTH Toolbox: chkpoint_mstep

Files
file	chkpt_mstp.f
	Set of multi-file checkpoint routines for DNS, MHD and perturbation simulations.

Functions/Subroutines
subroutine	chkpts_register ()
	Register multi step checkpointing module. More...
subroutine	chkpts_init
	Initialise multi-file checkpoint routines. More...
logical function	chkpts_is_initialised ()
	Check if module was initialised. More...
subroutine	chkpts_write ()
	Write full file restart set. More...
subroutine	chkpts_read ()
	Read full file restart set. More...
subroutine	chkpt_dt_get
	Get old simulation time steps and pressure mesh marker. More...
subroutine	chkpt_set_name (fname, fnum, nset, ifile)
	Generate set of restart file names in snapshot. More...
subroutine	chkpt_fname (fname, prefix, nset, ifile, ierr)
	Generate single restart file name. More...
subroutine	chkpt_restart_write (fname, fnum, ifcoord)
	Write checkpoint snapshot. More...
subroutine	chkpt_restart_read (fname, fnum)
	Read checkpoint snapshot. More...
subroutine	chkpt_mfo (fname, chktype, ipert)
	Write field to the file. More...
subroutine	chkpt_mfi (fname, chktype, ipert)
	Read field to the file. More...
subroutine	chkpt_map_gll (xf, yf, nxr, nzr, nel)
	Interpolate input on velocity mesh. More...
subroutine	chkpt_map_gl (xf, yf, nxr, nzr, nel)
	Interpolate pressure input. More...
subroutine	chkpt_axis_interp_ic ()
	Map loaded variables from velocity to axisymmetric mesh. More...

Detailed Description

Function/Subroutine Documentation

chkpt_axis_interp_ic()

subroutine chkpt_axis_interp_ic

(

)

Map loaded variables from velocity to axisymmetric mesh.

Note

This is version of axis_interp_ic taking into account fact pressure does not have to be written on velocity mesh.

Remarks

This routine uses global scratch space CTMP0.

chkpt_dt_get()

subroutine chkpt_dt_get

(

)

Get old simulation time steps and pressure mesh marker.

Todo:

Different files could have different chpm_if_pmesh, so it is not the best place to read it

chkpt_fname()

subroutine chkpt_fname	(	character*132	fname,
		character*3	prefix,
		integer	nset,
		integer	ifile,
		integer	ierr
	)

Generate single restart file name.

Parameters

[out]	fname	restart file name
[in]	prefix	prefix
[in]	nset	set number
[in]	ifile	snupshot numer
[out]	ierr	error mark

chkpt_map_gl()

subroutine chkpt_map_gl	(	real, dimension(lx2,ly2,lz2,nel)	xf,
		real, dimension(nxr,nxr,nzr,nel)	yf,
		integer	nxr,
		integer	nzr,
		integer	nel
	)

Interpolate pressure input.

This is version of mapab modified to work with pressure mesh. It iterpolates fields defined on GL points. Like the orginal routine I assume NXR=NYR=NZR, or NXR=NYR, NZR=1

Parameters

[out]	xf	output field on pressure mesh
[in]	yf	input field on pressure mesh
[in]	nxr,nzr	array sizes
[in]	nel	element number

Remarks

This routine uses global scratch space CTMP0, CTMPABM2

chkpt_map_gll()

subroutine chkpt_map_gll	(	real, dimension(lx1,ly1,lz1,nel)	xf,
		real, dimension(nxr,nxr,nzr,nel)	yf,
		integer	nxr,
		integer	nzr,
		integer	nel
	)

Interpolate input on velocity mesh.

This is version of mapab with corrected array sizes. It iterpolates fields defined on GLL points. Like the orginal routine I assume NXR=NYR=NZR, or NXR=NYR, NZR=1

Parameters

[out]	xf	output field on velocity mesh
[in]	yf	input field on velocity mesh
[in]	nxr,nzr	array sizes
[in]	nel	element number

Remarks

This routine uses global scratch space CTMP0, CTMPABM1

chkpt_mfi()

subroutine chkpt_mfi	(	character*132	fname,
		integer	chktype,
		integer	ipert
	)

Read field to the file.

This routine is based on mfi but supports perturbation as well. It is optimised for chekpoint reading.

Parameters

[in]	fname	file name
[in]	chktype	data type to read (DNS, MHD, preturbation)
[in]	ipert	index of perturbation field

Remarks

This routine uses global scratch space SCRUZ.

chkpt_mfo()

subroutine chkpt_mfo	(	character*132	fname,
		integer	chktype,
		integer	ipert
	)

Write field to the file.

This routine is based on mfo_outfld but does not assume any file numbering. It is optimised for chekpoint writing.

Parameters

[in]	fname	file name
[in]	chktype	data type to write (DNS, MHD, perturbation)
[in]	ipert	index of perturbation field

Note

Only one set of data (DNS, MHD or perturbation) can be saved in single file

Remarks

This routine uses global scratch space SCRCG.

chkpt_restart_read()

subroutine chkpt_restart_read	(	character*132, dimension(chkptnfmax)	fname,
		integer	fnum
	)

Read checkpoint snapshot.

Parameters

[out]	fname	restart file name
[in]	fnum	number of files in snapshot

chkpt_restart_write()

subroutine chkpt_restart_write	(	character*132, dimension(chkptnfmax)	fname,
		integer	fnum,
		logical	ifcoord
	)

Write checkpoint snapshot.

Parameters

[out]	fname	restart file name
[in]	fnum	number of files in snapshot
[in]	ifcoord	do we save coordinates

chkpt_set_name()

subroutine chkpt_set_name	(	character*132, dimension(chkptnfmax)	fname,
		integer	fnum,
		integer	nset,
		integer	ifile
	)

Generate set of restart file names in snapshot.

Parameters

[out]	fname	restart file names
[out]	fnum	number of files in snapshot
[in]	nset	set number
[in]	ifile	snupshot numer

chkpts_init()

subroutine chkpts_init

(

)

Initialise multi-file checkpoint routines.

Note

This interface is defined in chkpt_main

chkpts_is_initialised()

logical function chkpts_is_initialised

(

)

Check if module was initialised.

Returns

chkpts_is_initialised

chkpts_read()

subroutine chkpts_read

(

)

Read full file restart set.

Note

This interface is defined in chkpt_main

This is version of full_restart routine.

chkpts_register()

subroutine chkpts_register

(

)

Register multi step checkpointing module.

chkpts_write()

subroutine chkpts_write

(

)

Write full file restart set.

Note

This interface is defined in chkpt_main.

This is version of full_restart_save routine.