model teststate3



  block Common

    Integer b;

  end Common;



  model Hookup

    outer Common global;

    Boolean active;

    parameter Integer m;

  algorithm

    when (active) then

      global.b := m;

    end when;

  end Hookup;



  inner Common global;



  Hookup fred (m = 0, active = true);

  Hookup ginger (m = 1, active = false);



end teststate3;

class teststate3

  Integer global.b;

  Boolean fred.active = true;

  parameter Integer fred.m = 0;

  Boolean ginger.active = false;

  parameter Integer ginger.m = 1;

algorithm

  when fred.active then

    fred.global.b := fred.m;

  end when;

  when ginger.active then

    ginger.global.b := ginger.m;

  end when;

end teststate3;