File: modules/TrExe.pm Version: 3.27
TrExe ... TrExe.pm Runs Transp codes Use: Runpr
TrDat
TrDbase
TrDir
TrEnv
TrMDS
TrPPF
Ufile
Util
strict
whouseRoutine Comment Arguments Archive Transfer files to data warehouse Config Testbed for TR.DAT manipulation $SR/ModTest DAT Config 50621 M00 ExeVn Reset executables version, if necessary.. Export Reset to start of transp run - NB run via rsh
$opt = {"Exp","Res","Imp"}
$strun = Transp run statusmy ($opt, $strun ) = @_ ; Import Reset to start of transp run - NB run via rsh Kk3jt Run KK3jt, prepare TERA PPF Link Run uplink to create new transp executable Logsum Summary of the log file .. MRYnm Construct MRY filename my ( $shot, $seq ) = @_ ; ModTest Test run
Eg "$SR/ModTest EXE -TWD $TWD 50621L52 step prep "Nblist Run the nblist program..
2.61 07Jun2010 Input is indirect Uread file
ppf, ufl selection by Uread args
cuid.. defined by cmnd line args
2.56 26Jan2010 Remove check on !NBLIST.FOR in $TRDAT
2.51 19May2009 Check PNBI dependence on NBI4
2.24 24Mar2004 Add X response to _nblist_
2.21 11Nov2003 Write to PPF system
2.16 15Jul2003 Call nblinwr for MAST, move tr.dat to/from $TDDmy( $run, $shot ) = @_ ; Plabel Run plabel , -> TF.PLN file Pretr Run pretr, & get the "expert" file RF Run RF codes ( TrICH, ececon ) RFA_Files Link in the antenna geometry files Repeat DELETE RUN OUTPUT and repeat runMPI Reset Reset to start of transp run - NB run via rsh Restart Restart a crashed run, or repeat a successful run RestartRS execute the transp run from ..RS.DAT Result Transfer netcdf to $RESULTDIR RunTransp execute the transp run.. Scruncher Run scruncher Step Choose the step & run it.. Test Run a simple test executable ( diagnostic only ) TrFile Run TrFile, convert PPFs to Ufiles..
01Aug2013 3.25 UtoP - if TR.DAT doesnt specify Ufiles ( eg if a repeat run ),
then use TR.DAT.1 ( if available )
06May2008 2.48 TrFile - use numbered backups of TR.DAT
PtoU input - TR.DAT.0
UtoP input - TR.DAT.1 = Vn for run
PtoM input - TR.DAT.2TrLook Run TrLook TrLookIn Import files for trlook my( $host, $from, $to ) = @_ ; Trdat Run trdat
30Jul2012 3.17 Fix ErrStr - in single quotes ( to hide b/slashes ) + Err::Box uses grep -P
X if( TrArg::Q("MDStree") eq "new" ) {
X mdsdata() or Err::Die( "Cant create MDSplus tree " ) ; }Trdat_ck Check PPF seq numbers my( $trdat, $shot ) = @_ ; V Print version number bptouf Run bptouf ; converts PPF to Ufiles cdfcnv Convert output to cdf format dbase Invite user to add the run to the dbase ( use w3c interface ) dbase_pshare Invite user to add the run to the dbase
( You can take a horse to water.... )dbase_upd Show the Update page, mark run complete.. mdsdata Create mdsplus trdata tree mdsplot Run mdsplot, create trout tree
16Aug2012 3.18 mdsplot - fix bad target filepoplt2 Run poplt2 prep Prepare for Transp ( local ) run preppl Prepare for Transp ( MPI ) run @ pppl