数学建模社区-数学中国
标题:
学了LINGO才2天别笑我写的东西,求助接口指针写法。
[打印本页]
作者:
cqwj
时间:
2010-4-15 23:52
标题:
学了LINGO才2天别笑我写的东西,求助接口指针写法。
本帖最后由 cqwj 于 2010-4-18 13:47 编辑
1 L, ]" {1 Y' J$ h4 K2 F5 G# [
& h$ [; a6 \6 c8 |" A
指针处怎么写??
9 I0 ]2 _/ C: J3 B
我的意思就是说@pointer在模型里面怎么定义?如@pointer(1)=??或 ??=@pointer(1)
( N$ T0 l/ A( \& W, v: b/ v4 \7 A/ f
表示什么意思。我个人理解@pointer(1)=??表示把数模变量的值??装进@pointer(1)这个储存单元,外部程序程序可调用此储存单元数据。??=@pointer(1)表示外部数据值??通过DLL传来的数据放进数模变量,这样理解对吗?
& R! N) ^/ G) u, q: P/ T9 O$ w
:) sets:
) ~) j% Q) D9 {: |3 I
xinxi:cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k,zys,x,y,z;
, X$ X- u. R6 Y$ A9 v x
endsets
* [! a L' [3 t* c4 c
data:
, R1 F% p: z/ W
xinxi,cl190,cl160,cl270,gzsj,sl190,sl160,sl270,sj190,sj160,sj270,k= @file("li_yong.txt")
$ H' E' V' t) a. q w( h- l4 d
@TEXT()=@status();
$ e! }, P4 p" G0 } t
enddata
( i. P; C+ \7 j/ \
[bb] min=@sum(xinxi:sj190*x+sj160*y+sj270*z);
2 Z* N1 k/ h5 P6 }( t" b1 I0 L
@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)<=12);
0 ]$ c( r, D0 i; |
@for(xinxi(i):sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i)>=0);
: a) d! E, z% R. @* S P0 I5 V8 r
@sum(xinxi:x)=sr190;
2 T0 v3 U: i1 d4 ^
@sum(xinxi:y)=sr160;
% b) T7 M% x3 b2 X
@sum(xinxi:z)=sr270;
" f* E% t/ ~/ q) R' z7 j& D0 Z, ^
@sum(xinxi:x)>=0;
8 b' `7 i8 K! g% x# B. I
@sum(xinxi:y)>=0;
; [; V: O' N4 t0 u
@sum(xinxi:z)>=0;
* Q# o) p$ g& ^, p1 x
@for(xinxi(i):x(i)<=cl190(i)*sl190(i));
1 U( F; h% L( l+ [5 t8 `% q
@for(xinxi(i):x(i)>=0);
- [4 s! i' I! Z" V' r( \& ~
@for(xinxi(i):y(i)<=cl160(i)*sl160(i));
! G* k0 i3 z' w
@for(xinxi(i):y(i)>=0);
! g+ Z6 T' x& M. n3 H. h: ~
@for(xinxi(i):z(i)<=cl270(i)*sl270(i));
# x4 N. z7 o r1 W
@for(xinxi(i):z(i)>=0);
5 w" x4 X( r* `: A. X
@for(xinxi(i):@gin(x(i)));
! w" L- K) d2 K. o( K) e' [1 B
@for(xinxi(i):@gin(y(i)));
d" J8 U1 g+ b. w: z3 l3 d
@for(xinxi(i):@gin(z(i)));
0 C% c& N0 u3 A7 z i1 \- h$ N
mm=@sum(xinxi:k);
9 Y+ r6 [: G$ m8 h. H8 u
xx=@sum(xinxi:sj190*x+sj160*y+sj270*z)/mm;
: M2 U3 ]7 f+ B6 W6 J
3 J" N! R! e% ~4 d% T
@for(xinxi(i):zys(i)=sj190(i)*x(i)+sj160(i)*y(i)+sj270(i)*z(i));
- Z V& @) k' Y+ ]2 O
DATA:
, B% Z7 s2 b; }$ k' j
@POINTER
" _; X: p6 X$ e+ }1 w% h
6 `' ]4 x9 M' A0 K
!此处结果想连接VB6.0,却不知道怎么写;
# T; z$ |# x6 ]
ENDDATA
1 D9 D9 N+ C) z2 n2 L8 c$ p. I
+ G7 {5 H9 _/ X4 X% }4 Z& n( e$ j
end
) Z0 l- \4 b. [
结果为 主要是想取 X,Y,Z的结果
- H% h- ^- s$ t9 e0 `$ V8 V4 H
Global optimal solution found.
4 T3 A6 Q! P* s" ^" |
Objective value: 0.000000
8 ~8 a) z, z, {0 ?
Extended solver steps: 0
. H. Z) k2 F) V: K1 z0 Q V
Total solver iterations: 0
' C: {& S4 a2 b+ V9 J _/ x; y' h0 Q7 A
4 ^( L P3 _" o: R, D- [) H
; S2 `% `& a* A/ i3 }4 [1 L
0
, ]5 `) S+ ` P
9 P( F# u" |" E" `, \9 @
Variable Value Reduced Cost
0 h% @2 N6 M2 j! s& _2 j
SR190 0.000000 0.000000
& }1 D' I7 N7 s* _
SR160 0.000000 0.000000
+ O) l5 k5 p4 {8 O1 }
SR270 0.000000 0.000000
& T- g* ^2 ]/ j s s# Z
MM 2.000000 0.000000
& T# ~" Y: c2 e) p1 R @3 E+ a( p
XX 0.000000 0.000000
; D$ E8 N. V2 _
CL190( ZHANG) 35.00000 0.000000
) O3 Z+ {5 N9 J' Y
CL190( LI) 35.00000 0.000000
3 u3 `9 [2 `1 m0 `* c. M3 B1 i4 p
CL160( ZHANG) 30.00000 0.000000
8 V* F6 {: K, s
CL160( LI) 30.00000 0.000000
( E- m4 w/ N1 v: S8 M" L
CL270( ZHANG) 5.000000 0.000000
: R8 h# O3 ~3 @5 Q
CL270( LI) 5.000000 0.000000
4 ?8 D9 }/ O: b, L# U
GZSJ( ZHANG) 12.00000 0.000000
' a7 i. h, F' o0 B
GZSJ( LI) 12.00000 0.000000
( X* Y9 ]# N5 _) V
SL190( ZHANG) 0.9000000 0.000000
4 W' l2 ^. s6 H( L1 m$ ^( B
SL190( LI) 0.8000000 0.000000
: q: i2 ^. Y. f# [( p1 l
SL160( ZHANG) 0.9000000 0.000000
, l o* o# F7 W0 G
SL160( LI) 0.9000000 0.000000
) S% G+ _: d4 g
SL270( ZHANG) 0.8000000 0.000000
7 N9 _! g+ }% \% S4 y. x2 Z3 n
SL270( LI) 0.6000000 0.000000
O2 `$ d( B7 {
SJ190( ZHANG) 0.3770000 0.000000
' }, N: x0 l s' J
SJ190( LI) 0.4120000 0.000000
7 p" g' x; m* G" o7 z9 [
SJ160( ZHANG) 0.4400000 0.000000
+ b# ^* o, N/ ~* |
SJ160( LI) 0.4400000 0.000000
0 l6 M0 Z& D! f( h8 ^
SJ270( ZHANG) 2.880000 0.000000
* d" m6 w" l8 A/ i0 b+ E5 \
SJ270( LI) 3.360000 0.000000
. D( {8 q: |% C, h) m! _, n
K( ZHANG) 1.000000 0.000000
( W8 n: g! i! A1 U) g# C) [
K( LI) 1.000000 0.000000
7 R1 y2 F. l, y& B
ZYS( ZHANG) 0.000000 0.000000
5 N9 p2 B: [# M
ZYS( LI) 0.000000 0.000000
# ^% a% M4 |- A
X( ZHANG) 0.000000 0.3770000
- o& `# J& f5 X) k- k( ]
X( LI) 0.000000 0.4120000
7 [- s2 ^6 w+ x2 k8 m
Y( ZHANG) 0.000000 0.4400000
" [( V |+ f# r* n M6 R9 e
Y( LI) 0.000000 0.4400000
* b% F3 j& [ `) o4 x7 _
Z( ZHANG) 0.000000 2.880000
. ~- Y4 g/ P5 K5 c( V7 w6 I
Z( LI) 0.000000 3.360000
7 N4 _. n& d* R0 q
& Z* ]0 j7 n+ w" u4 b
Row Slack or Surplus Dual Price
5 c+ E% W3 l. C
BB 0.000000 -1.000000
% M; b8 t! [: t1 H. S+ `
2 12.00000 0.000000
7 H; t8 ~* ~ ~
3 12.00000 0.000000
1 ~7 ~! m/ a5 k5 g8 c- E
4 0.000000 0.000000
- i! i4 t- R) ^+ b9 N7 Q
5 0.000000 0.000000
- V1 T. T0 q1 d( c7 o) x
6 0.000000 0.000000
4 `; ]0 |; ]6 y9 C( ?* k* N
7 0.000000 0.000000
c) H( j" q% R2 |8 n/ `1 ?
8 0.000000 0.000000
" o O" X% Y" i
9 0.000000 0.000000
: H9 f) ?2 S3 w4 o1 F, ~& B
10 0.000000 0.000000
3 n9 b) E! d/ A& ~; o. ~/ d
11 0.000000 0.000000
! I$ j2 z, W6 `* X2 d1 W- t$ p
12 31.50000 0.000000
' y% B7 ~$ i G
13 28.00000 0.000000
2 u7 ]4 j7 O, }4 j* P
14 0.000000 0.000000
, ]! [2 Y" H8 ^8 V, i( T
15 0.000000 0.000000
4 a: M8 A4 p: b# D& E
16 27.00000 0.000000
! J# H* `1 Z- N L4 P3 |7 k' M
17 27.00000 0.000000
, d/ g& P. y7 A9 p! }
18 0.000000 0.000000
" b2 @# T( u2 k9 p- p
19 0.000000 0.000000
% G+ i9 a# u; A
20 4.000000 0.000000
8 I5 X% m* E/ _: C, C& i. ~- `- G6 x8 W
21 3.000000 0.000000
! S3 x% x* ?+ @* V0 \7 y e8 o
22 0.000000 0.000000
' H- r) |' j2 Y% Q( K- X# l
23 0.000000 0.000000
2 ]/ n! M/ K5 b
24 0.000000 0.000000
* l i+ T/ o/ Y, H' \/ y9 p
25 0.000000 0.000000
: K! |! {& H5 c0 |2 V6 |
26 0.000000 0.000000
/ j a$ {6 `6 Q8 l+ C+ E3 `8 ~# q
27 0.000000 0.000000
作者:
olh2008
时间:
2010-4-16 07:49
VB中调用Lingo使用DLL就行了
作者:
olh2008
时间:
2010-4-16 07:50
这是一个例子,可以参考一下。
# m/ k3 ^2 J/ Z4 h3 F* s$ t
Staff1.rar
(8.2 KB, 下载次数: 6)
2010-4-16 07:50 上传
点击文件名下载附件
下载积分: 体力 -2 点
作者:
cqwj
时间:
2010-4-16 11:56
回复
3#
olh2008
( v4 h& u6 n' g* h5 Q3 K F
/ l7 ^- H/ z8 P# ?' I
3 y1 C' E- T! ?5 I2 i4 Z7 E" `
你发的附件不对,再说我也有这个例程,只是不清楚指针这么写到数模里才好调用。
作者:
olh2008
时间:
2010-4-16 11:59
指针怎么写到数模里
: u, t8 @: X& Q, r8 N# L
这是什么意思?
作者:
legan
时间:
2010-4-16 12:07
谁会LINGO与C++的混合编程啊,我想用C++的循环调用LINGO编的程序进行复杂的优化类问题计算
作者:
funintears
时间:
2010-4-16 12:18
lingo可以和c++混合编程呀?!厉害,牛人指导下呀!!!
作者:
haoshuang3394
时间:
2010-4-16 19:28
lingo怎么用啊,看着代码挺怪的?
作者:
风云雨哲
时间:
2010-4-16 20:04
请教高手Lingo的使用。请教高手Lingo的使用。
作者:
cqwj
时间:
2010-4-16 22:16
LINGO的代码很简单,相当于命令格式,但是要灵活运用的话也不简单。
作者:
cqwj
时间:
2010-4-16 22:17
年龄18岁以下的同学最好不用,会有依赖感
作者:
madio
时间:
2010-4-16 22:53
要想用C++调用lingo需要了lingo的命令行使用方法,C++采用调用外部程序的方法也可以调用lingo。可以看lingo的帮助文档。例如:
' E4 k1 G$ r3 Y* _
Solution Commands in Brief
8 A/ y6 u1 D) ^
Top Previous Next
7 X/ h6 \9 c& L r9 }* y, [
DEBUG
8 \9 T1 S! E! N. U8 o! G$ [
tracks down formulation errors in infeasible and unbounded models
9 d# F* m; T2 x9 A2 A N, p' y6 u
& y$ a3 ?0 n, B* X7 w0 N
GO
# w3 T1 w2 W& q& _# m( q i+ u- Y4 d
solves the current model
* _ r# f2 W# O" I; \
; Z& K) y& ^ P+ G9 v! ?3 ?8 K
NONZ
8 P0 U" ?% Y3 u! A
generates a nonzeros only solution report
0 u/ \# b3 X7 {! s8 P0 z) a
5 K9 a# H/ d& m
RANGE
H2 p( `7 w; \4 X" Y( M
generates a range analysis report
8 |$ d+ Y' X9 t
! M+ g% F' n2 o1 U" w
SOLU
$ Z c6 {1 h/ u
generates a solution report
作者:
fangxuanfxuan
时间:
2010-4-17 21:55
谢谢~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
作者:
cqwj
时间:
2010-4-18 13:50
这是命令行语句,@pointer怎么用还是不清楚。。。。期待中。
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5