您所在位置：主题：MS-dos 批处理文件，请大侠赐教
taiwweiqiuqiu
[专家分：0] 发布于 2010-05-20 10:59:00
fl32 /W0 /nologo solv.for c:\ifepg.f32\\nfe\FEPG.LIB
fl32 /W0 /nologo /c aeq4.for
fl32 /W0 /nologo /c agl2.FOR
fl32 /W0 /nologo /c all2.for
fl32 /W0 /nologo /c beq4.for
fl32 /W0 /nologo starta.for c:\ifepg.f32\\nfe\FEPG.LIB
fl32 /W0 /nologo egaoa.FOR @gaoa.lin c:\ifepg.f32\\nfe\fepg.lib
if not exist usub.for FL32 /W0 /nologo ugaoa.for
if exist usub.for FL32 /W0 /nologo ugaoa.for usub.for c:\ifepg.f32\\nfe\fepg.lib
if exist egaob.obj del egaob.obj
if exist c:\ifepg.f32\\nfe\libamd.a goto 1
fl32 /W0 /nologo egaob.for @gaob.lin c:\ifepg.f32\\nfe\fepg.lib
goto end
:1
fl32 /W0 /nologo egaob.for @gaob.lin c:\ifepg.f32\\nfe\fepg.lib c:\ifepg.f32\\nfe\libamd.a c:\ifepg.f32\\nfe\libumfpack.a
:end
fl32 /W0 /nologo /c aeq4.for
fl32 /W0 /nologo /c agl2.FOR
fl32 /W0 /nologo /c all2.for
fl32 /W0 /nologo /c beq4.for
fl32 /W0 /nologo starta.for c:\ifepg.f32\\nfe\FEPG.LIB
fl32 /W0 /nologo egaoa.FOR @gaoa.lin c:\ifepg.f32\\nfe\fepg.lib
if not exist usub.for FL32 /W0 /nologo ugaoa.for
if exist usub.for FL32 /W0 /nologo ugaoa.for usub.for c:\ifepg.f32\\nfe\fepg.lib
if exist egaob.obj del egaob.obj
if exist c:\ifepg.f32\\nfe\libamd.a goto 1
fl32 /W0 /nologo egaob.for @gaob.lin c:\ifepg.f32\\nfe\fepg.lib
goto end
:1
fl32 /W0 /nologo egaob.for @gaob.lin c:\ifepg.f32\\nfe\fepg.lib c:\ifepg.f32\\nfe\libamd.a c:\ifepg.f32\\nfe\libumfpack.a
:end