88 procedure,
nopass:: cast2extras
92 procedure:: init_task_list
93 procedure:: pre_update
94 procedure:: post_update
96 procedure:: check_refine
104 SUBROUTINE pre_init (self)
107 call trace%begin (
'extras_t%pre_init')
109 END SUBROUTINE pre_init
114 SUBROUTINE init (self)
117 call trace%begin (
'extras_t%init')
134 SUBROUTINE init_task_list (self, task_list)
136 class(
list_t),
pointer:: task_list
138 self%task_list => task_list
139 END SUBROUTINE init_task_list
144 SUBROUTINE dealloc (self)
147 call trace%begin (
'extras_t%dealloc')
153 END SUBROUTINE dealloc
161 SUBROUTINE pre_update (self)
169 END SUBROUTINE pre_update
174 SUBROUTINE post_update (self)
180 END SUBROUTINE post_update
185 SUBROUTINE output (self)
188 call self%gpatch_t%output
189 END SUBROUTINE output
194 INTEGER function check_refine (self, patch)
203 END FUNCTION check_refine
208 FUNCTION cast2extras (task)
RESULT(extras)
210 class(
task_t),
pointer:: task
218 call io%abort (
'extras_t%cast: failed to cast a task to extras_t')
220 END FUNCTION cast2extras
The gpath_t layer now essentially only handles restarts.
Module with list handling for generic class task_t objects.
Template module for patches, which adds pointers to memory and mesh, and number of dimensions and var...
Module holding anonymous pointers back to extras features.
Template module for tasks.