flattening fail with parameter fixed=false and redeclare

[Vitalij Ruge]

checkModel fail for the following Example:

package pSetPara
  model base
    parameter Real p1;
  end base;

  model repM
    replaceable model model1 = pSetPara.base;
  protected
    model1 model1Instance;
  end repM;

  model updatePara
    parameter Real unknow(fixed = false);
    repM M(redeclare model model1 = pSetPara.base(p1 = unknow));
  initial equation
    unknow = -1;
  end updatePara;
end pSetPara;

with Error occurred while flattening model pSetPara.updatePara

checkModel for updatePara return "unknow" is unknow.
If we replace parameter Real unknow(fixed = false); with
parameter Real unknow(fixed = true, start = -1); then checkModel is successfully.

probably connect to #3476

[Vitalij Ruge]

remove the lines

protected
  model1 model1Instance;

in repM, change the result for checkModel, too.