|
NCEPLIBS-w3emc
2.11.0
|
Translates arg line from standard input. More...
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | w3trnarg (SUBDIR, LSUBDR, TANKID, LTNKID, APPCHR, LAPCHR, TLFLAG, IYMDHB, IYMDHE, IERR) |
| Reads argument lines from standard input and obtains subdirectory, bufr tankname, characters to append for adding an orbit, and options for limiting the time window. More... | |
| subroutine w3trnarg | ( | character*(*) | SUBDIR, |
| LSUBDR, | |||
| character*(*) | TANKID, | ||
| LTNKID, | |||
| character*(*) | APPCHR, | ||
| LAPCHR, | |||
| character*(*) | TLFLAG, | ||
| IYMDHB, | |||
| IYMDHE, | |||
| IERR | |||
| ) |
Reads argument lines from standard input and obtains subdirectory, bufr tankname, characters to append for adding an orbit, and options for limiting the time window.
| Date | Programmer | Comment |
|---|---|---|
| 1996-09-03 | B. KATZ | Original author |
| 1998-11-27 | B. KATZ | Changes for y2k and fortran 90 compliance |
| 2002-02-11 | D. KEYSER | If "tlflag" is not specified, it defaults to |
"notimlim" rather than "timlim" and gross time limits will not be calculated and returned in "iymdhb" and "iymdhe"
| [in] | SUBDIR | Name of sub-directory including bufr data type where bufr data tank is located. |
| [in] | LSUBDR | Number of characters in 'subdir'. |
| [in] | TANKID | Name of file including bufr data sub-type containing bufr data tank. |
| [in] | LTNKID | Number of characters in 'tankid'. |
| [in] | APPCHR | Characters to be appended to 'tankid' giving a uniquely named file to contain the original tank with one orbit appended to it. |
| [in] | LAPCHR | Number of characters in 'appchr'. |
| [in] | TLFLAG | 8 character flag indicating whether time acceptance checks atre to be performed. = 'timlim ' : perform time acceptance checks. = 'notimlim' : do not perform time acceptance checks. jdate and kdate are disregarded. |
| [in] | IYMDHB | Start of time acceptance window, in form yyyymmddhh. |
| [in] | IYMDHE | End of time acceptance window, in form yyyymmddhh. |
| IERR | Input files : unit 05 - standard input for passing in arguments. arguments (for list-directed i/o) are as follows : record 1 - (1) subdirectory. contains bufr data type (2) tankfile. contains bufr data sub-type (3) append characters. appended to tankfile to give unique output file name. (4) date in yyyymmddhh format. next three records are optional : record 2 - (1) time limit flag. may be either 'timlim ' or 'notimlim'. see description of 'tlflag' above. (default is 'notimlim') record 3 - (1) hours before current time. record 4 - (1) hours after current time. if 'timlim ' is specified in record 2, the quantities in records 3 and 4 are used to compute the limits of the time acceptance window. if records 3 and 4 are omitted, the values default to -48 (48 hours before current time) and +12 (12 hours after current time). if 'notimlim ' is specified in record 2, then these quantities are not used regardless of whether or not they were specified. |
Definition at line 63 of file w3trnarg.f.