Changeset 138 for trunk/sample/miscellaneous
- Timestamp:
- Jan 26, 2007, 3:21:01 PM (15 years ago)
- Location:
- trunk/sample/miscellaneous
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/sample/miscellaneous/sample_arrays2.mso
r83 r138 39 39 diff(Var1(2:Dimension,:))*"s" = Scalar*Var2(2:Dimension,:); 40 40 41 exp(Scalar)*Var2 = sin(time /"s");41 exp(Scalar)*Var2 = sin(time*"rad/s"); 42 42 end 43 43 -
trunk/sample/miscellaneous/sample_car.mso
r83 r138 49 49 50 50 EQUATIONS 51 diff([xl, yl, xr, yr]) = q;51 diff([xl, yl, xr, yr])*"s" = q; 52 52 53 eps^2*M/2 * diff(q(1)) = (l0-ll)*xl/ll53 eps^2*M/2 * diff(q(1))*"s" = (l0-ll)*xl/ll 54 54 +lambda(1)*xb +2*lambda(1)*(xl-xr); 55 55 56 eps^2*M/2 * diff(q(2)) = (l0-ll)*yl/ll56 eps^2*M/2 * diff(q(2))*"s" = (l0-ll)*yl/ll 57 57 +lambda(1)*yb +2*lambda(2)*(yr-yl) - eps^2*M/2; 58 58 59 59 60 eps^2*M/2 * diff(q(3)) = (l0-lr)*(xr-xb)/lr60 eps^2*M/2 * diff(q(3))*"s" = (l0-lr)*(xr-xb)/lr 61 61 -2*lambda(2)*(xl-xr); 62 62 63 eps^2*M/2 * diff(q(4)) = (l0-lr)*(yr-yb)/lr63 eps^2*M/2 * diff(q(4))*"s" = (l0-lr)*(yr-yb)/lr 64 64 -2*lambda(2)*(yl-yr) - eps^2*M/2; 65 65 … … 70 70 xb = sqrt(l^2-yb^2); 71 71 72 yb = r*sin(w*time );72 yb = r*sin(w*time*"rad/s"); 73 73 74 74 ll = sqrt(xl^2 + yl^2); -
trunk/sample/miscellaneous/sample_cstr_simple.mso
r83 r138 36 36 k0 as frequency; 37 37 Ea as energy_mol (Brief = "Energia de Ativação"); 38 R as en ergy_mol;38 R as entr_mol; 39 39 40 40 VARIABLES … … 57 57 58 58 "Constante de Reação" 59 k=k0*exp(Ea/R*(1/ 436.15 - 1*"K"/T));59 k=k0*exp(Ea/R*(1/(436.15*"K") - 1/T)); 60 60 61 61 "Taxas de Reação" … … 67 67 68 68 "Cp da mistura" 69 Cps=(0.5*250)*3 ;# *"cal/mol/K";69 Cps=(0.5*250)*3 * "J/mol/K"; 70 70 71 71 "Balanço de Energia" -
trunk/sample/miscellaneous/sample_galvanic.mso
r83 r138 44 44 VARIABLES 45 45 46 y1 as current(Default=0.5, Brief="Mole fraction of NiOOH");47 y2 as current(Default=0.5, Brief="Potential difference at the solid-liquid interface");46 y1 as Real(Default=0.5, Brief="Mole fraction of NiOOH"); 47 y2 as Real(Default=0.5, Brief="Potential difference at the solid-liquid interface"); 48 48 49 49 … … 53 53 54 54 "Equation 1(a)" 55 pho*V/W*diff(y1) = i01*(2*(1-y1)*exp(0.5*F/(R*T)*(y2-phi1))-2*y1*exp(-0.5*F/(R*T)*(y2-phi1)))/F;55 pho*V/W*diff(y1)*"s" = i01*(2*(1-y1)*exp(0.5*F/(R*T)*(y2-phi1))-2*y1*exp(-0.5*F/(R*T)*(y2-phi1)))/F; 56 56 57 57 "Equation 1(b)" … … 89 89 INITIAL 90 90 #Parameters used for the initial conditions 91 #y1 = 0.05 ;91 #y1 = 0.05"; 92 92 y2 = 0.38; 93 93 -
trunk/sample/miscellaneous/sample_hyperbolics.mso
r107 r138 41 41 42 42 Pi as constant (Brief="Pi Number",Default=3.14159265); 43 Theta as angle (Brief ="theta angle",Default=0.5);43 Theta as Real (Brief ="Argument",Default=0.5); 44 44 45 45 VARIABLES … … 53 53 54 54 Pi = 3.14159265; 55 Theta = 0.6*Pi *"rad";55 Theta = 0.6*Pi; 56 56 57 57 EQUATIONS -
trunk/sample/miscellaneous/sample_if_tanh.mso
r83 r138 36 36 A = 10*xif + 5*xelse; 37 37 38 xif = (1 + tanh(B * (time - 3)))/2;39 xelse = (1 - tanh(B * (time - 3)))/2;38 xif = (1 + tanh(B * (time/"s" - 3)))/2; 39 xelse = (1 - tanh(B * (time/"s" - 3)))/2; 40 40 41 41 SET -
trunk/sample/miscellaneous/sample_manipulation.mso
r107 r138 41 41 PARAMETERS 42 42 43 Number( 2) as Real;43 Number(3) as Real; 44 44 45 45 VARIABLES 46 46 47 absolute( 2) as Real (Brief ="abs function");48 maximum (2)as Real (Brief ="max function");49 minimum (2)as Real (Brief ="Natural log function");50 signal( 2) as Real (Brief ="square root function");51 rounds( 2) as Real (Brief ="square root function");47 absolute(3) as Real (Brief ="abs function"); 48 maximum as Real (Brief ="max function"); 49 minimum as Real (Brief ="Natural log function"); 50 signal(3) as Real (Brief ="square root function"); 51 rounds(3) as Real (Brief ="square root function"); 52 52 53 53 SET 54 54 55 Number = [-10.3, 5.001];55 Number = [-10.3,0,5.001]; 56 56 57 57 EQUATIONS -
trunk/sample/miscellaneous/sample_mathematicals.mso
r107 r138 46 46 EQUATIONS 47 47 48 exponential = exp(time );49 log10 = log(time );50 NatLog = ln(time );51 squareRoot = sqrt(time );48 exponential = exp(time/"s"); 49 log10 = log(time/"s"); 50 NatLog = ln(time/"s"); 51 squareRoot = sqrt(time/"s"); 52 52 53 53 OPTIONS -
trunk/sample/miscellaneous/sample_trigonometrics.mso
r107 r138 50 50 tangent as Real (Brief ="tangent function",Default=0.5); 51 51 52 arccosine as Real(Brief ="arc cosine function",Default=0.5);53 arcsine as Real(Brief ="arc sine function",Default=0.5);54 arctangent as Real(Brief ="arc tangent function",Default=0.5);52 arccosine as angle (Brief ="arc cosine function",Default=0.5); 53 arcsine as angle (Brief ="arc sine function",Default=0.5); 54 arctangent as angle (Brief ="arc tangent function",Default=0.5); 55 55 56 56 SET
Note: See TracChangeset
for help on using the changeset viewer.