research/incomp-flame-post
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

declaration exporter variables

Browse source
This commit is contained in:
ignis 2019-07-07 18:37:21 +09:00
parent 6f906f10c8
commit c3b0a9d7b2
2 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
code/code_gen/post.py
View file

@ -226,11 +226,11 @@ integer(kind=MPI_OFFSET_KIND) :: offset
fmt_decl=''' fmt_decl='''
! - file_handles and mpi_infos ! - file_handles and mpi_infos
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_info integer(kind=MPI_INTEGER_KIND) :: {field_name}_info
! - buffer ! - buffer
! real*8, allocatable, dimension(:,:,:) :: {field_name}_export_array real*8, allocatable, dimension(:,:,:) :: {field_name}_export_array
''' '''
fmt_init=''' fmt_init='''
@ -277,7 +277,7 @@ integer(kind=MPI_OFFSET_KIND) :: offset
return FieldExporter.fmt_calc # real_array_loop.format((self.array, rhs), self.comment) return FieldExporter.fmt_calc # real_array_loop.format((self.array, rhs), self.comment)
def code_decl (self): def code_decl (self):
return FieldExporter.fmt_decl # real_array_decl.format(self.name, self.dim) return FieldExporter.fmt_decl.format(field_name=self.name)
def code_alloc (self): def code_alloc (self):
return FieldExporter.fmt_init # real_array_alloc.format(self.name, self.shape) return FieldExporter.fmt_init # real_array_alloc.format(self.name, self.shape)

6
code/m_terms.f90
View file

@ -18,11 +18,11 @@ integer(kind=MPI_OFFSET_KIND) :: offset
! - file_handles and mpi_infos ! - file_handles and mpi_infos
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh integer(kind=MPI_INTEGER_KIND) :: divn_fh
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_info integer(kind=MPI_INTEGER_KIND) :: divn_info
! - buffer ! - buffer
! real*8, allocatable, dimension(:,:,:) :: {field_name}_export_array real*8, allocatable, dimension(:,:,:) :: divn_export_array
real*8, allocatable, dimension(:,:,:) :: xyzbuffer0 real*8, allocatable, dimension(:,:,:) :: xyzbuffer0
real*8, allocatable, dimension(:,:,:) :: xyzbuffer1 real*8, allocatable, dimension(:,:,:) :: xyzbuffer1