job_time Interface

public interface job_time

returns job time


Module Procedures

private function job_time_integer8(counter) result(string)

return the time string converted from counter ex) counter=100000000 with integer(8) --> 100 sec --> 1 minute 40.00 seconds

Arguments

Type IntentOptional Attributes Name
integer(kind=8), intent(in) :: counter

Return Value character(len=60)

private function job_time_real(time) result(string)

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: time

Return Value character(len=60)