*
This routine reads the dates and times for which windfields are * available. * * Authors: A. Stohl * * 6 February 1994 * 8 February 1999, Use of nested fields, A. Stohl * *
*
Variables: * bdate beginning date as Julian date * beg beginning date for windfields * endl ending date for windfields * fname filename of wind field, help variable * ideltas [s] duration of modelling period * idiff time difference between 2 wind fields * idiffnorm normal time difference between 2 wind fields * idiffmax [s] maximum allowable time between 2 wind fields * jul julian date, help variable * numbwf actual number of wind fields * wfname(numbwf) file names of needed wind fields * wftime(numbwf) [s]times of wind fields relative to beginning time * wfname1,wftime1 = same as above, but only local (help variables) * * Constants: * unitavailab unit connected to file AVAILABLE * *