declaration exporter variables

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

View file

@ -226,11 +226,11 @@ integer(kind=MPI_OFFSET_KIND) :: offset
fmt_decl='''
! - file_handles and mpi_infos
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_info
integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh
integer(kind=MPI_INTEGER_KIND) :: {field_name}_info
! - buffer
! real*8, allocatable, dimension(:,:,:) :: {field_name}_export_array
real*8, allocatable, dimension(:,:,:) :: {field_name}_export_array
'''
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)
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):
return FieldExporter.fmt_init # real_array_alloc.format(self.name, self.shape)

View file

@ -18,11 +18,11 @@ integer(kind=MPI_OFFSET_KIND) :: offset
! - file_handles and mpi_infos
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_fh
! integer(kind=MPI_INTEGER_KIND) :: {field_name}_info
integer(kind=MPI_INTEGER_KIND) :: divn_fh
integer(kind=MPI_INTEGER_KIND) :: divn_info
! - 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(:,:,:) :: xyzbuffer1