Searched defs:shgl1 (Results 1 – 1 of 1) sorted by relevance
78 subroutine vortELE(y,x,shp1,shgl1,ien,vortIntG,lpmassG) argument84 real*8 shp1(nshl,MAXQPT), shgl1(nsd,nshl,MAXQPT) local