let select<Constructable => RResult<Intro, RYearDependent>,
           Constructable => RYearDependent,
           let 'a =
              match RYearDependent with
              | FaAdditionalInfoPageHolder -> Fa2010AdditionalInfoPageHolder
              | FaProfitPageHolder -> Fa2010ProfitPageHolder,
           let 'b = FaCompanyInfoPageOnvdSelected[Intro, RResult<Intro, 'a>, 'a],
           Constructable => 'b>
    =
    innerSelectPeriod Y2010 PTYears
    construct<'b>