data_frame
pure function df_is_initialized(this) result(is_init) class(data_frame), intent(in) :: this logical :: is_init is_init = this % initialized end function df_is_initialized