package Ġorg . jetbrains . fortran . ide . completion Ċ Ċ import Ġcom . intellij . code Insight . completion . Completion Parameters Ċ import Ġcom . intellij . code Insight . completion . Completion Provider Ċ import Ġcom . intellij . code Insight . completion . Completion ResultSet Ċ import Ġcom . intellij . code Insight . lookup . Lookup Element Ċ import Ġcom . intellij . code Insight . lookup . Lookup Element Builder Ċ import Ġcom . intellij . util . Processing Context Ċ Ċ class ĠKeyword Completion Provider ( val Ġkeywords : ĠCollection < String >) Ġ: ĠCompletion Provider < Completion Parameters >() Ġ{ ĊĠĠĠ Ġoverride Ġfun Ġadd Comp letions ( parameters : ĠCompletion Parameters , Ġcontext : ĠProcessing Context , Ġresult : ĠCompletion ResultSet ) Ġ{ ĊĠĠĠĠĠĠĠ Ġresult . addAll Elements ( keywords . map Ġ{ Ġget Lookup Element ( it ) Ġ}) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġget Lookup Element ( keyword : ĠString ): ĠLookup Element Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġbuilder Ġ= ĠLookup Element Builder . create ( keyword ) ĊĠĠĠĠĠĠĠ Ġbuilder . with Priority ( KEYWORD _ PRIORITY ) ĊĠĠĠĠĠĠĠ Ġreturn Ġbuilder ĊĠĠĠ Ġ} Ċ }