Index: mttroot/mtt/bin/trans/cbg2ese_m2r ================================================================== --- mttroot/mtt/bin/trans/cbg2ese_m2r +++ mttroot/mtt/bin/trans/cbg2ese_m2r @@ -14,10 +14,13 @@ ## Version control history ############################################################### ## $Id$ ## ## $Log$ +## Revision 1.1 1996/08/08 15:57:15 peter +## Initial revision +## ############################################################### infofile='stdout'; eqnfile="$1_ese.r"; deffile="$1_def.r"; @@ -33,20 +36,19 @@ echo Creating $1_def.r # Use matrix manipulation to accomplish the transformation $MATRIX > cbg2ese_m2r.log 2>> cbg2ese_m2r.log << EOF - infofile = '$infofile' - eqnfile = '$eqnfile' - deffile = '$deffile' - system_name = '$1' +infofile = '$infofile' +system_name = '$1' +deffile = '$1_def.r'; - structure = cbg2ese(system_name,[],eqnfile,infofile) - makedef(structure,deffile); +structure = cbg2ese(system_name,'','',infofile) +makedef(structure,deffile); EOF