attach_scale Subroutine

private subroutine attach_scale(scale_id, data_id, axies, name, label)

Arguments

Type IntentOptional Attributes Name
integer(kind=hid_t), intent(in) :: scale_id
integer(kind=hid_t), intent(in) :: data_id
integer, intent(in) :: axies
character(len=*), intent(in) :: name
character(len=*), intent(in), optional :: label

Calls

proc~~attach_scale~~CallsGraph proc~attach_scale attach_scale h5dsattach_scale_f h5dsattach_scale_f proc~attach_scale->h5dsattach_scale_f h5dsset_label_f h5dsset_label_f proc~attach_scale->h5dsset_label_f h5dsset_scale_f h5dsset_scale_f proc~attach_scale->h5dsset_scale_f

Called by

proc~~attach_scale~~CalledByGraph proc~attach_scale attach_scale proc~hdf5_data_create hdf5_data_create proc~hdf5_data_create->proc~attach_scale proc~hdf5_init hdf5_t%hdf5_init proc~hdf5_init->proc~attach_scale proc~hdf5_init->proc~hdf5_data_create

Source Code

subroutine attach_scale(scale_id, data_id, axies, name, label)
    integer(hid_t),         intent(in) :: scale_id
    integer(hid_t),         intent(in) :: data_id
    integer,                intent(in) :: axies
    character(*),           intent(in) :: name
    character(*), optional, intent(in) :: label

    integer :: err

    if(present(label)) call h5dsset_label_f(data_id, axies, label, err)
    call h5dsset_scale_f(scale_id, err, name)
    call h5dsattach_scale_f(data_id, scale_id, axies, err)
end subroutine attach_scale