general flop recorder module
the flop recorder type simply contains a flop count this should be the largest possible integer in the planet currently this will overflow for zetta flops
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=int64), | private | :: | flop_count | = | 0_int64 |
procedure, public :: add => add_flops | |
procedure, public :: get => get_flops | |
procedure, public :: reset => reset_flop_counter |
Get the int64 number of FLOPs we currently have in the counter
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(flop_recorder_type), | intent(in) | :: | self |
Add an int64 variable which contains the FLOPs we use int64 since we might reach very large FLOP counts
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(flop_recorder_type), | intent(inout) | :: | self | |||
integer(kind=int64), | intent(in) | :: | flops |
Resets the flop counter to 0_int64
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(flop_recorder_type), | intent(inout) | :: | self |