See this Lightshow example:
http://bit.ly/1LEnEHJ
or just the code below:
within ;
model SurfaceToAir "cool model"
Modelica.Electrical.Analog.Basic.Resistor inRes[3,3];
Modelica.Electrical.Analog.Basic.Resistor outRes[3,3];
equation
for j in 1:3 loop
for k in 1:3 loop
if inRes[j,k].R > 0 then
outRes[j,k].R = Modelica.Math.cos(inRes[j,k].R - inRes[k,j].R);
elseif inRes[j, k].R > 2 then
outRes[j,k].R = Modelica.Math.cos( inRes[j,k].R - inRes[k,j].R);
elseif inRes[j, k].R > 3 then
outRes[j,k].R = Modelica.Math.sin(inRes[j, k].R - inRes[k,j].R);
else
outRes[j,k].R = 0;
end if;
end for;
end for;
annotation (uses(Modelica(version="3.2.1")));
end SurfaceToAir;
See this Lightshow example:
http://bit.ly/1LEnEHJ
or just the code below: