Sponsored links: Algebra eBooks
 

Related

sprint

/* Definintion von zw...

b:[false,false,true,t...

eq2: /* Definition ei...

Calculate

sprint

/* Definintion von zw...

b:[false,false,true,t...

eq2: /* Definition ei...

Calculate

sprint

/* Definintion von zw...

b:[false,false,true,t...

eq2: /* Definition ei...

Calculate

sprint

/* Definintion von zw...

b:[false,false,true,t...

eq2: /* Definition ei...

Calculate

sprint

Run Example
(%i1)/* Definintion von zwei Vektoren die als Paramter für die Funktionen dienen sollen */a:[false,true,false,true];
(%o1)                     [false, true, false, true]
(%i2) b:[false,false,true,true];
(%o2)                     [false, false, true, true]
(%i3) eq2: /* Definition einer Vektorfunktion für eine UND - Verknüpfung  */ eq3:UND(a,b):=[a[1] and b[1],a[2] and b[2],a[3] and b[3],a[4] and b[4]];
(%o3)      UND(a, b) := [a  and b , a  and b , a  and b , a  and b ]
                          1      1   2      2   3      3   4      4
(%i4) /* Überprüfen der Wahrheitstabelle für die Und-Funktion und die zuvor definierten Vektoren. Die transpose-Funktion verwandelt einen Zeilen in einen Spaltenvektor.Mit Hilfe der Matrix-Funktion können die Vektoren als matrix ausgegeben werden.Dies ermöglicht die Darstellung der Warheitstabelle in gewohnter Form. */sprint(transpose(a)," ",transpose(b)," ",transpose(UND(a,b)));
matrix([false],[true],[false],[true])   matrix([false],[false],[true],[true])   matrix([false],[false],[false],[true])                                    [ false ]
                                   [       ]
                                   [ true  ]
(%o4)                              [       ]
                                   [ false ]
                                   [       ]
                                   [ true  ]
(%i5) /* Definition einer Vektorfunktion für eine ODER - Verknüpfung */eq:ODER(a,b):=[a[1] or b[1],a[2] or b[2],a[3] or b[3],a[4] or b[4]];
(%o5)       ODER(a, b) := [a  or b , a  or b , a  or b , a  or b ]
                            1     1   2     2   3     3   4     4
(%i6) eq6:/* Überprüfen der Oder-Funktion mit hilfe der Funktionen transpose und matrix */eq:matrix[transpose(a),transpose(b),transpose(ODER(a,b))];
(%o6)                matrix
                           [ false ]  [ false ]  [ false ]
                           [       ]  [       ]  [       ]
                           [ true  ]  [ false ]  [ true  ]
                           [       ], [       ], [       ]
                           [ false ]  [ true  ]  [ true  ]
                           [       ]  [       ]  [       ]
                           [ true  ]  [ true  ]  [ true  ]
(%i7) /* Definition einer Vektorfunktion für eine ODER - Verknüpfung */NICHT(a):=[not a[1], not a[2], not a[3], not a[4]];
(%o7)            NICHT(a) := [not a , not a , not a , not a ]
                                   1       2       3       4
(%i8) [transpose(a),transpose(NICHT(a))];
                             [ false ]  [ true  ]
                             [       ]  [       ]
                             [ true  ]  [ false ]
(%o8)                       [[       ], [       ]]
                             [ false ]  [ true  ]
                             [       ]  [       ]
                             [ true  ]  [ false ]
(%i9) IMPL(a,b):=ODER(NICHT(a) ,b );
(%o9)                   IMPL(a, b) := ODER(NICHT(a), b)
(%i10) [transpose(a),transpose(b),transpose(IMPL(a,b))];
                        [ false ]  [ false ]  [ true  ]
                        [       ]  [       ]  [       ]
                        [ true  ]  [ false ]  [ false ]
(%o10)                 [[       ], [       ], [       ]]
                        [ false ]  [ true  ]  [ true  ]
                        [       ]  [       ]  [       ]
                        [ true  ]  [ true  ]  [ true  ]
(%i11) AEQUI(a,b):=UND(IMPL(a,b),IMPL(b,a));
(%o11)            AEQUI(a, b) := UND(IMPL(a, b), IMPL(b, a))
(%i12) [transpose(a),transpose(b),transpose(AEQUI(a,b))];
                        [ false ]  [ false ]  [ true  ]
                        [       ]  [       ]  [       ]
                        [ true  ]  [ false ]  [ false ]
(%o12)                 [[       ], [       ], [       ]]
                        [ false ]  [ true  ]  [ false ]
                        [       ]  [       ]  [       ]
                        [ true  ]  [ true  ]  [ true  ]
(%i13) 
Run Example
kill(all);
(%o0)                                done
(%i1) sprint(56)+sprint(76);
56 76 (%o1)                                 132
(%i2) 
Run Example
voltage : (26+31+63+165);
(%o1)                                 285
(%i2) v_TB: 1.2;
(%o2)                                 1.2
(%i3) R1: 51000;
(%o3)                                51000
(%i4) R2 : 8200;
(%o4)                                8200
(%i5) R3:20000;
(%o5)                                20000
(%i6) R4:10000;
(%o6)                                10000
(%i7) R_T1:250;
(%o7)                                 250
(%i8) R_T2:8200;
(%o8)                                8200
(%i9) R_C: 1600;
(%o9)                                1600
(%i10) R_SCP1:200;
(%o10)                                200
(%i11) R_SCP2:22000;
(%o11)                               22000
(%i12) R_T:1/(1/R_T2+1/R_T1);
                                     41000
(%o12)                               -----
                                      169
(%i13) R_SCP:1/(1/R_SCP2+1/R_SCP1);
                                     22000
(%o13)                               -----
                                      111
(%i14) R_T_Cmax:1/(1/R_T2+1/(R_T1+R_C));
                                    303400
(%o14)                              ------
                                     201
(%i15) I_T1_c:(8200/(250+8200));
                                      164
(%o15)                                ---
                                      169
(%i16) I_T2_c:(250/(250+8200));
                                       5
(%o16)                                ---
                                      169
(%i17) Imax_T2_c:((R_T1+R_C)/(R_T1+R_T2+R_C));
                                      37
(%o17)                                ---
                                      201
(%i18) I_SCP1_c:(22000/(200+22000));
                                      110
(%o18)                                ---
                                      111
(%i19) I_SCP2_c:(200/(200+22000));
                                       1
(%o19)                                ---
                                      111
(%i20) R_supply2battery: R1+R2+R3+R4+R_T1+R_SCP1;
(%o20)                               89650
(%i21) R_supply2battery_correct: R1+R2+R3+R4+R_T+R_SCP1;
                                   15149600
(%o21)                             --------
                                     169
(%i22) R_total:R1+R2+R3+R4+R_SCP+R_T;
                                  1681571800
(%o22)                            ----------
                                    18759
(%i23) R_total_Cmax: R_total-R_T+R_T_Cmax;
                                   676080200
(%o23)                             ---------
                                     7437
(%i24) current_total : (voltage / R_total);
                                    1069263
(%o24)                             ---------
                                   336314360
(%i25) current_total_Cmax:(voltage / R_total_Cmax);
                                    423909
(%o25)                             ---------
                                   135216040
(%i26) Vin : current_total_Cmax * Imax_T2_c * R_T2;
                                   15996765
(%o26)                             --------
                                   3380401
(%i27) power_max: current_total^2 * R1/2;
                               291547457608095
(%o27)                         ----------------
                               1131073487422096
(%i28) power_TCE: (current_total * I_T1_c )^2 * R_T1/2;
                                 336459958245
(%o28)                          ---------------
                                282768371855524
(%i29) current_TCE: current_total * I_T1_c;
                                    259407
(%o29)                             --------
                                   84078590
(%i30) current_BE_total: v_TB / R_SCP;
(%o30)                        0.0060545454545455
(%i31) power_BE_total:(current_BE_total)^2 * R_SCP/2;
(%o31)                        0.0036327272727273
(%i32) power_BE_control: (I_SCP1_c*current_BE_total)^2 * R_SCP1/2;
(%o32)                              0.0036
(%i33) current_BE_small: v_TB / R_SCP1;
(%o33)                               0.006
(%i34) power_BE_small: current_BE_small^2 * R_SCP1 / 2;
(%o34)                              0.0036
(%i35) current_supply2battery: (voltage+v_TB)/R_supply2battery;
(%o35)                        0.0031924149470162
(%i36) power_supply2battery_max : current_supply2battery^2 * R1/2;
(%o36)                         0.25988358644527
(%i37) sprint("R_total");
R_total (%o37)                              R_total
(%i38) printf(true,"~e",R_total/1000);
8.9640801748494056E+1(%o38)                               false
(%i39)   newline();

(%o39)                               false
(%i40) sprint("current_total");
current_total (%o40)                           current_total
(%i41) printf(true,"~e",current_total);
3.1793557670270161E-3(%o41)                               false
(%i42)   newline();

(%o42)                               false
(%i43) sprint("Vin");
Vin (%o43)                                Vin
(%i44) printf(true,"~e",Vin);
4.7322092852297697E+0(%o44)                               false
(%i45)   newline();

(%o45)                               false
(%i46) sprint("power_max");
power_max (%o46)                             power_max
(%i47) printf(true,"~e",power_max);
2.5776172887986259E-1(%o47)                               false
(%i48)   newline();

(%o48)                               false
(%i49) sprint("power_TCE");
power_TCE (%o49)                             power_TCE
(%i50) printf(true,"~e",power_TCE);
1.1898783305825619E-3(%o50)                               false
(%i51)   newline();

(%o51)                               false
(%i52) sprint("current_TCE");
current_TCE (%o52)                            current_TCE
(%i53) printf(true,"~e",current_TCE);
3.0852919869374593E-3(%o53)                               false
(%i54)   newline();

(%o54)                               false
(%i55) sprint("current_BE_total");
current_BE_total (%o55)                         current_BE_total
(%i56) printf(true,"~e",current_BE_total);
6.0545454545454548E-3(%o56)                               false
(%i57)   newline();

(%o57)                               false
(%i58) sprint("power_BE_total");
power_BE_total (%o58)                          power_BE_total
(%i59) printf(true,"~e",power_BE_total);
3.6327272727272727E-3(%o59)                               false
(%i60)   newline();

(%o60)                               false
(%i61) sprint("power_BE_control");
power_BE_control (%o61)                         power_BE_control
(%i62) printf(true,"~e",power_BE_control);
3.5999999999999999E-3(%o62)                               false
(%i63)   newline();

(%o63)                               false
(%i64) sprint("current_BE_small");
current_BE_small (%o64)                         current_BE_small
(%i65) printf(true,"~e",current_BE_small);
6.0000000000000001E-3(%o65)                               false
(%i66)   newline();

(%o66)                               false
(%i67) sprint("power_BE_small");
power_BE_small (%o67)                          power_BE_small
(%i68) printf(true,"~e",power_BE_small);
3.5999999999999999E-3(%o68)                               false
(%i69)   newline();

(%o69)                               false
(%i70) sprint("current_supply2battery");
current_supply2battery (%o70)                      current_supply2battery
(%i71) printf(true,"~e",current_supply2battery);
3.192414947016174E-3(%o71)                               false
(%i72)   newline();

(%o72)                               false
(%i73) sprint("power_supply2battery_max");
power_supply2battery_max (%o73)                     power_supply2battery_max
(%i74) printf(true,"~e",power_supply2battery_max);
2.5988358644527315E-1(%o74)                               false
(%i75)   newline();

(%o75)                               false
(%i76) current_supply2battery_correct_total: (voltage+v_TB)/R_supply2battery_correct;
(%o76)                         0.003192678354544
(%i77) current_supply2battery_correct_CE: current_supply2battery_correct_total * I_T1_c;
(%o77)                        0.0030982204150605
(%i78) power_supply2battery_max_correct_max : current_supply2battery_correct_total^2 * R1/2;
(%o78)                         0.25992647442713
(%i79) power_supply2battery_max_correct_CE: current_supply2battery_correct_CE^2 * R_T1/2;
(%o79)                        0.0011998712175372
(%i80) sprint("current_supply2battery_correct_total");
current_supply2battery_correct_total (%o80)               current_supply2battery_correct_total
(%i81) printf(true,"~e",current_supply2battery_correct_total);
3.1926783545440139E-3(%o81)                               false
(%i82)   newline();

(%o82)                               false
(%i83) sprint("current_supply2battery_correct_CE");
current_supply2battery_correct_CE (%o83)                 current_supply2battery_correct_CE
(%i84) printf(true,"~e",current_supply2battery_correct_CE);
3.098220415060463E-3(%o84)                               false
(%i85)   newline();

(%o85)                               false
(%i86) print("power_supply2battery_max_correct_max");
power_supply2battery_max_correct_max 
(%o86)               power_supply2battery_max_correct_max
(%i87) printf(true,"~e",power_supply2battery_max_correct_max);
2.5992647442713374E-1(%o87)                               false
(%i88)   newline();

(%o88)                               false
(%i89) print("power_supply2battery_max_correct_CE");
power_supply2battery_max_correct_CE 
(%o89)                power_supply2battery_max_correct_CE
(%i90) printf(true,"~e",power_supply2battery_max_correct_CE);
1.1998712175371785E-3(%o90)                               false
(%i91)   newline();

(%o91)                               false
(%i92) 

Related Help

Help for Sprint