fact: Definition GetFlag {n'} {subtopics : Vector.t (Fin.t n) n'} (flags : Flags subtopics) (topic : Fin.t n') : RADL_Flag := Vector.nth flags topic.
imports: Coq.Strings.String Coq.Bool.Bool Coq.Lists.List Coq.Arith.Arith Coq.Program.Program Fiat.ADT Fiat.ADT.ComputationalADT Fiat.ADTNotation Fiat.ADTRefinement Fiat.ADTRefinement.BuildADTRefinements Fiat.Fiat4Monitors.RADL_Topics Fiat.Fiat4Monitors.RADL_Flag Bedrock.Memory