STALOC.CMM

Go to the documentation of this file.

C
   LOGICAL JGOOD(NSITES)
   CHARACTER*5 CHSTID(NSITES)     
C   
   COMMON /STALOC/ XG(NSITES),YG(NSITES),ZG(NSITES),WTDOP(NXGRD,
     $         NYGRD,NWSITE),WTEMP(NXGRD,NYGRD,NTSITE),JGOOD,
     $         JPRYLX(NWNDPT),JPRYLY(NWNDPT),XDOP(NWSITE),
     $         YDOP(NWSITE),ZDOP(NWSITE),XTMP(NTSITE),YTMP(NTSITE),
     $         ZTMP(NTSITE),ZSIGL(NWSITE,NZGRD),CHSTID