Octopus
debug_oct_m Module Reference

Data Types

type  debug_t
 

Functions/Subroutines

subroutine, public debug_init (this, namespace)
 
subroutine, public debug_enable (this)
 
subroutine, public debug_disable (this)
 
subroutine, public debug_delete_trace ()
 
subroutine, public debug_open_trace (iunit)
 
subroutine from_bits (this)
 
subroutine, public epoch_time_diff (sec, usec)
 
subroutine time_diff (sec1, usec1, sec2, usec2)
 Computes t2 <- t2-t1. sec1,2 and usec1,2 are seconds,microseconds of t1,2. More...
 

Variables

type(debug_t), save, public debug
 
integer, parameter unit_offset = 1000
 max_lun is currently 99, i.e. we can hardwire unit_offset above 1000 More...
 

Function/Subroutine Documentation

◆ debug_init()

subroutine, public debug_oct_m::debug_init ( type(debug_t), intent(out)  this,
type(namespace_t), intent(in)  namespace 
)

Definition at line 147 of file debug.F90.

◆ debug_enable()

subroutine, public debug_oct_m::debug_enable ( type(debug_t), intent(inout)  this)

Definition at line 242 of file debug.F90.

◆ debug_disable()

subroutine, public debug_oct_m::debug_disable ( type(debug_t), intent(inout)  this)

Definition at line 257 of file debug.F90.

◆ debug_delete_trace()

subroutine, public debug_oct_m::debug_delete_trace

Definition at line 266 of file debug.F90.

◆ debug_open_trace()

subroutine, public debug_oct_m::debug_open_trace ( integer, intent(out)  iunit)

Definition at line 280 of file debug.F90.

◆ from_bits()

subroutine debug_oct_m::from_bits ( type(debug_t), intent(inout)  this)
private

Definition at line 295 of file debug.F90.

◆ epoch_time_diff()

subroutine, public debug_oct_m::epoch_time_diff ( integer, intent(inout)  sec,
integer, intent(inout)  usec 
)

Definition at line 311 of file debug.F90.

◆ time_diff()

subroutine debug_oct_m::time_diff ( integer, intent(in)  sec1,
integer, intent(in)  usec1,
integer, intent(inout)  sec2,
integer, intent(inout)  usec2 
)
private

Computes t2 <- t2-t1. sec1,2 and usec1,2 are seconds,microseconds of t1,2.

Definition at line 324 of file debug.F90.

Variable Documentation

◆ debug

type(debug_t), save, public debug_oct_m::debug

Definition at line 140 of file debug.F90.

◆ unit_offset

integer, parameter debug_oct_m::unit_offset = 1000
private

max_lun is currently 99, i.e. we can hardwire unit_offset above 1000

Definition at line 143 of file debug.F90.