chksum_active Function

public pure function chksum_active(probe, step) result(active)

Gate: enabled AND inside the step window.

Arguments

Type IntentOptional Attributes Name
type(chksum_probe_t), intent(in) :: probe
integer, intent(in) :: step

Return Value logical


Called by

proc~~chksum_active~~CalledByGraph proc~chksum_active chksum_active proc~chksum_bt chksum_bt proc~chksum_bt->proc~chksum_active interface~rdb_debug_chksum rdb_debug_chksum proc~chksum_bt->interface~rdb_debug_chksum proc~chksum_hotface chksum_hotface proc~chksum_hotface->proc~chksum_active proc~chksum_state chksum_state proc~chksum_state->proc~chksum_active proc~chksum_state->interface~rdb_debug_chksum proc~rdb_debug_chksum_2d rdb_debug_chksum_2d proc~rdb_debug_chksum_2d->proc~chksum_active proc~rdb_debug_chksum_3d rdb_debug_chksum_3d proc~rdb_debug_chksum_3d->proc~chksum_active interface~rdb_debug_chksum->proc~rdb_debug_chksum_2d interface~rdb_debug_chksum->proc~rdb_debug_chksum_3d proc~ocean_dyn_step_split ocean_dyn_step_split proc~ocean_dyn_step_split->proc~chksum_state proc~run_stage_split run_stage_split proc~ocean_dyn_step_split->proc~run_stage_split proc~run_stage_split->proc~chksum_bt proc~run_stage_split->proc~chksum_hotface proc~run_stage_split->proc~chksum_state proc~engine_step engine_step proc~engine_step->proc~ocean_dyn_step_split proc~driver_run_ocean driver_run_ocean proc~driver_run_ocean->proc~engine_step proc~rdb_ocean_step rdb_ocean_step proc~rdb_ocean_step->proc~engine_step proc~driver_run driver_run proc~driver_run->proc~driver_run_ocean

Source Code

   pure function chksum_active(probe, step) result(active)
      !! Gate: enabled AND inside the step window.
      type(chksum_probe_t), intent(in) :: probe
      integer, intent(in) :: step
      logical :: active
      active = probe%enable
      if (active .and. probe%start_step > 0) active = step >= probe%start_step
      if (active .and. probe%end_step > 0) active = step <= probe%end_step
   end function chksum_active