reifenrealclass.mbe

来自「带反馈控制的半车Matlab模型」· MBE 代码 · 共 30 行

""

StateSpaceOdss named: ReifenrealClass.
  parameter: #(CReifenfeder)    on: ScalarOdss unit: 'N/m' default: 200000.0;
             #(DReifenfeder)    on: ScalarOdss unit: 'N/m' default: 500.0;
             #(Abhebebedingung) on: ScalarOdss default: 1.0;
  input:     #(zWeganregung)    on: ScalarOdss unit: 'm';
             #(zReifenpos)      on: VectorOdss size: 3 unit: 'm';
             #(zReifenvel)      on: VectorOdss size: 3 unit: 'm/s';
  output:    #(FReifenfeder)    on: VectorOdss size: 3 unit: 'N';
             #(FReifen)         on: ScalarOdss;



  auxiliar:  #(Federkraft)    on: ScalarOdss;
             #(auxFederkraft) on: ScalarOdss;

  auxiliarEquation:
    auxFederkraft := CReifenfeder * (zWeganregung - (zReifenpos at:3));
    auxFederkraft <= 0
      isTrue: [Federkraft := (auxFederkraft - (DReifenfeder * (zReifenvel at:3)))*Abhebebedingung]
      isFalse: [Federkraft := auxFederkraft - (DReifenfeder * (zReifenvel at:3))];

  outputEquation:
    FReifenfeder at: 1 put: 0;
    FReifenfeder at: 2 put: 0;
    FReifenfeder at: 3 put: Federkraft;
    FReifen := Federkraft;

end.