get_current_time Function

public function get_current_time() result(t)

Function to get the current working precision time, .

Arguments

None

Return Value real(kind=wp)

Returns .


Called by

proc~~get_current_time~~CalledByGraph proc~get_current_time get_current_time proc~output_igfb output_igfb proc~output_igfb->proc~get_current_time proc~output_cgfb output_cgfb proc~output_cgfb->proc~get_current_time proc~output_coords output_coords proc~output_coords->proc~get_current_time proc~osc_schw_output osc_schw_output proc~osc_schw_output->proc~get_current_time proc~output_rgf output_rgf proc~output_rgf->proc~get_current_time proc~scal_schw_rhs scal_schw_rhs proc~scal_schw_rhs->proc~get_current_time proc~scal_schw_load_globals scal_schw_load_globals proc~scal_schw_load_globals->proc~get_current_time proc~osc_schw_load_globals osc_schw_load_globals proc~osc_schw_load_globals->proc~get_current_time proc~sf_output sf_output proc~sf_output->proc~get_current_time proc~co_output co_output proc~co_output->proc~get_current_time proc~cobs_output cobs_output proc~cobs_output->proc~get_current_time proc~get_force get_force proc~get_force->proc~get_current_time program~test test program~test->proc~get_current_time proc~abmv5_init abmv5_init proc~abmv5_init->proc~get_current_time proc~output output proc~output->proc~get_current_time proc~geod_schw_output geod_schw_output proc~geod_schw_output->proc~get_current_time proc~output_rgfb output_rgfb proc~output_rgfb->proc~get_current_time proc~output_cgf output_cgf proc~output_cgf->proc~get_current_time interface~output_coords output_coords interface~output_coords->proc~output_coords interface~osc_schw_output osc_schw_output interface~osc_schw_output->proc~osc_schw_output interface~output_rgf output_rgf interface~output_rgf->proc~output_rgf interface~co_output co_output interface~co_output->proc~co_output interface~cobs_output cobs_output interface~cobs_output->proc~cobs_output interface~osc_schw_load_globals osc_schw_load_globals interface~osc_schw_load_globals->proc~osc_schw_load_globals interface~scal_schw_rhs scal_schw_rhs interface~scal_schw_rhs->proc~scal_schw_rhs interface~scal_schw_load_globals scal_schw_load_globals interface~scal_schw_load_globals->proc~scal_schw_load_globals interface~output_rgfb output_rgfb interface~output_rgfb->proc~output_rgfb interface~sf_output sf_output interface~sf_output->proc~sf_output interface~output_cgfb output_cgfb interface~output_cgfb->proc~output_cgfb interface~output_cgf output_cgf interface~output_cgf->proc~output_cgf interface~output_igfb output_igfb interface~output_igfb->proc~output_igfb interface~geod_schw_output geod_schw_output interface~geod_schw_output->proc~geod_schw_output interface~abmv5_init abmv5_init interface~abmv5_init->proc~abmv5_init

Contents

Source Code


Source Code

  function get_current_time ( ) result(t)
  !! Function to get the current working precision time, \(t\).

    implicit none

    real(wp) :: t
    !! Returns \(t\).

    t = time

  end function get_current_time