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 |
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 |
Get the int64 number of FLOPs we currently have in the counter
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(flop_recorder_type), | intent(in) | :: | self |
Resets the flop counter to 0_int64
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(flop_recorder_type), | intent(inout) | :: | self |
type :: flop_recorder_type !! 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 private integer(int64) :: flop_count = 0_int64 contains procedure :: add => add_flops procedure :: get => get_flops procedure :: reset => reset_flop_counter end type flop_recorder_type