Corrected C error in stopicru and other tweeks.

This commit is contained in:
salman 2009-09-14 14:18:43 +00:00
parent 4c8fd5730e
commit 469a4e6b3a
3 changed files with 7 additions and 7 deletions

View File

@ -2,6 +2,6 @@
# Copyright 2009 by Zaher Salman and the LEM Group.
export TRIMBIN=/usr/local/bin/trimsp7l
export PERLLIB=$HOME/Projects/TrimSPGUI
perl $HOME/Projects/TrimSPGUI/TrimSPGUI.pl
export PERLLIB=$HOME/LEM/simulation/trimsp/TrimSPGUI
perl $HOME/LEM/simulation/trimsp/TrimSPGUI/TrimSPGUI.pl

View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'TrimSPGUItabs.ui'
#
# Created: Mon Sep 14 15:05:11 2009
# Created: Mon Sep 14 16:18:29 2009
# by: The PerlQt User Interface Compiler (puic)
#
# WARNING! All changes made in this file will be lost!
@ -1879,11 +1879,11 @@ sub StartSequenceOne
# Use windoz version
# system("cp $FILENAME.inp eingabe1.inp; wine TrimSP7L.exe");
# Use Linux version
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd);
$Progress=$Progress+90/$#SValues;
Progress->setProgress($Progress);
Progress->update();
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd);
foreach ("err","out","rge") {
system("mv -f ausgabe1.$_ $FILENAME.$_");

View File

@ -500,11 +500,11 @@ void TrimSPGUI::StartSequenceOne()
# Use windoz version
# system("cp $FILENAME.inp eingabe1.inp; wine TrimSP7L.exe");
# Use Linux version
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd);
$Progress=$Progress+90/$#SValues;
Progress->setProgress($Progress);
Progress->update();
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd);
foreach ("err","out","rge") {
system("mv -f ausgabe1.$_ $FILENAME.$_");