7f90924706
Former-commit-id:7fa9dbd5fb[formerly4bfbdad17d] [formerly9f8cb727a5] [formerly7fa9dbd5fb[formerly4bfbdad17d] [formerly9f8cb727a5] [formerly8485b90ff8[formerly9f8cb727a5[formerly bf53d06834caa780226121334ac1bcf0534c3f16]]]] Former-commit-id:8485b90ff8Former-commit-id:40aa780b3d[formerly33a67cdd82] [formerly 73930fb29d0c1e91204e76e6ebfdbe757414f319 [formerlya28d70b5c5]] Former-commit-id: a16a1b4dd44fc344ee709abbe262aeed58a8339b [formerlye5543a0e86] Former-commit-id:0c25458510
50 lines
2 KiB
Text
50 lines
2 KiB
Text
C************************************************************************
|
|
C* /DBSET/ *
|
|
C* *
|
|
C************************************************************************
|
|
CHARACTER dbdttm*20, dbstid*6, dbstns*6,
|
|
+ dbdatasrc*20, dbparms*128, dbprmfile*20,
|
|
+ dbtimes(200)*20, dbtime*20, dburi*255,
|
|
+ dbmodel*30, navtime*20, enstimes(200)*20,
|
|
+ evtname*30, ensnames*500
|
|
LOGICAL dbread, firstdb, gridtmdb, isnavtime,
|
|
+ isenstime, isevtname, isensnames
|
|
INTEGER stnindx, idbstns, stnlat, stnlon, stnelv,
|
|
+ dbstlt, dbstln, dbstel, ntotstn, igdtim,
|
|
+ dimx, dimy, ienstim, nenstim, iensmem
|
|
COMMON / DBSET /
|
|
+ dbstns(LLSTFL),
|
|
+ stnlat(LLSTFL),
|
|
+ stnlon(LLSTFL),
|
|
+ stnelv(LLSTFL),
|
|
+ dbstlt,
|
|
+ dbstln,
|
|
+ dbstel,
|
|
+ ntotstn,
|
|
+ stnindx,
|
|
+ idbstns,
|
|
+ igdtim,
|
|
+ dimx, dimy,
|
|
+ ienstim,
|
|
+ nenstim,
|
|
+ iensmem,
|
|
+ dbread,
|
|
+ firstdb,
|
|
+ gridtmdb,
|
|
+ isnavtime,
|
|
+ isenstime,
|
|
+ isevtname,
|
|
+ isensnames,
|
|
+ dbtimes,
|
|
+ enstimes,
|
|
+ ensnames,
|
|
+ dburi,
|
|
+ dbtime,
|
|
+ navtime,
|
|
+ evtname,
|
|
+ dbdttm,
|
|
+ dbmodel,
|
|
+ dbstid,
|
|
+ dbdatasrc,
|
|
+ dbparms,
|
|
+ dbprmfile
|