WriteHDF5_Lagrange_t Subroutine

  1. SELF_Lagrange_t.f90
  2. SELF_Lagrange_t
  3. WriteHDF5_Lagrange_t

public subroutine WriteHDF5_Lagrange_t(this, fileId)

Arguments

TypeIntentOptionalAttributesName
class(Lagrange_t), intent(in) :: this
integer(kind=HID_T), intent(in) :: fileId

Contents

Source Code

WriteHDF5_Lagrange_t

Source Code

  subroutine WriteHDF5_Lagrange_t(this,fileId)
    implicit none
    class(Lagrange_t),intent(in) :: this
    integer(HID_T),intent(in) :: fileId

    call CreateGroup_HDF5(fileId,'/interp')

    call WriteArray_HDF5(fileId,'/interp/controlpoints', &
                         this%controlPoints)

    call WriteArray_HDF5(fileId,'/interp/qweights', &
                         this%qWeights)

    call WriteArray_HDF5(fileId,'/interp/dgmatrix', &
                         this%dgMatrix)

    call WriteArray_HDF5(fileId,'/interp/dmatrix', &
                         this%dMatrix)

    call WriteArray_HDF5(fileId,'/interp/bmatrix', &
                         this%bMatrix)

    call WriteArray_HDF5(fileId,'/interp/imatrix', &
                         this%iMatrix)

  endsubroutine WriteHDF5_Lagrange_t