LMU/musrsim
LMU/musrsim
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Corrected C error in stopicru and other tweeks.

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
trimsp/TrimSPGUI/TrimSP
View File

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

6
trimsp/TrimSPGUI/TrimSPGUI.pl
View File

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

4
trimsp/TrimSPGUI/TrimSPGUItabs.ui.h
View File

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