dc_clock::tochar Interface Reference

Public Member Functions
character(string) function	dcclocktochar0 (clk)

Detailed Description

Definition at line 188 of file dc_clock.f90.

Member Function/Subroutine Documentation

dcclocktochar0()

character(string) function dc_clock::tochar::dcclocktochar0

(

type(clock), intent(in)

clk

)

CPU 時間を適当に整形して文字型変数に変換

CPU 時間に関して適当に整形を行い、文字型変数に変換して返します。 clk に対して DCClockCreate による初期化が行われていない場合、 空文字が返ります。

Parameters

[in]

clk

CLOCK 型変数

Returns

整形された CPU 時間の文字列

Definition at line 551 of file dc_clock.f90.

    use dc_string, only: cprintf
    use dc_date, only: evalsec
    implicit none
    type(CLOCK), intent(in):: clk
    character(STRING):: result
    character(20):: clk_name
    integer:: name_len
  continue
    clk_name = ''
    name_len = min(len(clk_name), len_trim(clk % name))
    if (name_len > 0) then
      clk_name(1:name_len) = clk % name(1:name_len)
    end if
    if (clk % initialized) then
      result = cprintf(' %c%c  %c', c1 = clk_name, &
        & c2=trim(result_value_form(clk % elapsed_time)), &
        & c3=trim(fit_unit_value(clk % elapsed_time)))
    else
      result = ''
    end if

---

The documentation for this interface was generated from the following file:

• /build/gtool5-1.0.0~rc5/debian/build-serial/src/dc_utils/dc_clock.f90