to_string_dp Function

private function to_string_dp(r) result(trimmed_str)

transform a real(dp) to a string

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: r

Return Value character(len=:), allocatable


Called by

proc~~to_string_dp~~CalledByGraph proc~to_string_dp to_string_dp interface~to_string to_string interface~to_string->proc~to_string_dp proc~flop_rate_report flop_rate_type%flop_rate_report proc~flop_rate_report->interface~to_string proc~print_matrix_dp print_matrix_dp proc~print_matrix_dp->interface~to_string proc~print_matrix_int32 print_matrix_int32 proc~print_matrix_int32->interface~to_string proc~print_matrix_int64 print_matrix_int64 proc~print_matrix_int64->interface~to_string proc~print_matrix_sp print_matrix_sp proc~print_matrix_sp->interface~to_string proc~print_packed_matrix_dp print_packed_matrix_dp proc~print_packed_matrix_dp->interface~to_string proc~print_packed_matrix_int32 print_packed_matrix_int32 proc~print_packed_matrix_int32->interface~to_string proc~print_packed_matrix_int64 print_packed_matrix_int64 proc~print_packed_matrix_int64->interface~to_string proc~print_packed_matrix_sp print_packed_matrix_sp proc~print_packed_matrix_sp->interface~to_string proc~print_vector_dp print_vector_dp proc~print_vector_dp->interface~to_string proc~print_vector_int32 print_vector_int32 proc~print_vector_int32->interface~to_string proc~print_vector_int64 print_vector_int64 proc~print_vector_int64->interface~to_string proc~print_vector_sp print_vector_sp proc~print_vector_sp->interface~to_string proc~timer_print_time pic_timer_type%timer_print_time proc~timer_print_time->interface~to_string interface~print_array_v2 print_array_v2 interface~print_array_v2->proc~print_matrix_dp interface~print_array_v2->proc~print_matrix_int32 interface~print_array_v2->proc~print_matrix_int64 interface~print_array_v2->proc~print_matrix_sp interface~print_array_v2->proc~print_packed_matrix_dp interface~print_array_v2->proc~print_packed_matrix_int32 interface~print_array_v2->proc~print_packed_matrix_int64 interface~print_array_v2->proc~print_packed_matrix_sp interface~print_array_v2->proc~print_vector_dp interface~print_array_v2->proc~print_vector_int32 interface~print_array_v2->proc~print_vector_int64 interface~print_array_v2->proc~print_vector_sp proc~print_3d_tensor_dp print_3d_tensor_dp interface~print_array_v2->proc~print_3d_tensor_dp proc~print_3d_tensor_sp print_3d_tensor_sp interface~print_array_v2->proc~print_3d_tensor_sp proc~print_3d_tensor_dp->interface~print_array_v2 proc~print_3d_tensor_sp->interface~print_array_v2

Variables

Type Visibility Attributes Name Initial
character(len=32), private :: fmt
character(len=50), private :: str

Source Code

   function to_string_dp(r) result(trimmed_str)
      !! transform a real(dp) to a string
      real(kind=dp), intent(in) :: r
      character(len=50) :: str
      character(len=:), allocatable :: trimmed_str
      character(len=32) :: fmt
      !call write_with_precision(r, str)
      write (fmt, '(A,I0,A)') '(F0.', dp_precision, ')'
      write (str, fmt) r
      trimmed_str = trim(str)
   end function to_string_dp