开放式计算软件OpenLu－工程计算助手

forcal

    OpenLu是OpenFC的升级版本，OpenLu用Lu作为支持脚本。OpenLu力求消除冗余，简化计算。基本计算内容包括表达式计算、解非线性方程（组）、多元积分、微分方程求解、参数优化拟合、矩阵运算等等。
    OpenLu工作模式有三种，其即时编译计算模式特别适合于常用计算：在代码窗口写代码时，即时给出代码中的错误，若没有错误，将进行计算给出结果。
  t1 x# a# |: P4 u4 s. Z) p5 {" z% L    OpenLu不仅支持整数、实数、复数、三维向量等基本运算，还可以自定义常量、函数、命令菜单等。按需定制，简化计算是OpenLu的基本特点。

    本次升级，OpenLu简化了LuIMSL、LuOpt等扩展库，保留求方程（组）全部解、参数优化拟合等基本功能，函数用法也有诸多简化，以微分方程求解为例：

    [例子] 设一阶微分方程组及初值为：
        r'=2r-2rf, r(0)=1
        f'=-f+rf,  f(0)=3
    计算t=1,2,...,10时的r、f的值。
- G! W. C+ e6 {* R8 e: D
! F8 h* J$ Q/ \) S- D    程序如下：

2. !!!using["IMSL","math"];2 R* B$ e8 Y* I, l, O; k
   
4. f(t,r,f,dr,df)={dr=2*r-2*r*f, df=-f+r*f}; //函数定义
   
5. 2 {$ R7 `( i( v) L- n
6. ode[@f,ra1[0,1,2,3,4,5,6,7,8,9,10],ra1[1,3]].outa[];

!!!using["IMSL","math"];<font class=\\"jammer\\">2 R* B$ e8 Y* I, l, O; k</font><br /> f(t,r,f,dr,df)={dr=2*r-2*r*f, df=-f+r*f}; //函数定义<br /> <span style=\\"display:none\\">2 {$ R7 `( i( v) L- n</span> ode[@f,ra1[0,1,2,3,4,5,6,7,8,9,10],ra1[1,3]].outa[];

结果：

1. 0.  1.            3.
   ( x9 E! p& @0 [\" P# u6 @2 U8 t
2. 
   6 ?! U0 s6 L% i8 ~
3. 1.  7.73453e-002  1.46445
   9 o8 A7 [5 Q- Q: Y  F) {6 s/ B
4. 
   3 g/ [/ n$ r0 a+ G, P\" m4 o4 Y2 x. s: m
5. 2.  8.49774e-002  0.577954( }8 f: D0 K/ \9 F. W' w- ?
   
6. 0 H+ n+ x- W0 y$ u
   
7. 3.  0.290891      0.249253\" I# q3 t0 N: f2 m1 r
   
8. - Z$ q4 ?1 C. K6 V4 ~$ @
   
9. 4.  1.4466        0.187219
   2 X/ H9 M3 j/ S0 ?
10. & \; y- j; I/ N/ ]: {1 }
    
11. 5.  4.05146       1.43948
    : m+ }% G6 c  F\" @
12. + g  K7 _' V% Z) S( c. _
    
13. 6.  0.175618      2.2586! j$ M& g* B9 m' u3 U  K
    
14. 
      a! Y2 q. x3 O; r9 v
15. 7.  6.53112e-002  0.90888 u/ |7 j) }2 ?\" C$ \
    
16. 3 F$ U- `( W: w5 d
    
17. 8.  0.147227      0.366718$ {( V. T& q& [; @
    
18. \" P4 n' @. V9 I
    
19. 9.  0.650596      0.187575% n+ g2 S) a6 S7 b+ ~$ i7 t
    
20. 
    % H* W9 I& U, X
21. 10. 3.14433       0.348821

复制代码

详细说明：http://www.forcal.net/sysm/lu1/openlu_readme.htm
% B/ d# q! y7 F6 Z, K6 }6 ^" F    下载试用：http://www.forcal.net/xiazai/lu1/openlu32.rar

孤寂冷逍遥

liupeng723911

说的不错！