Home
last modified time | relevance | path

Searched defs:gendat (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/common/
H A Dgendat.f1 subroutine gendat (y, ac, x, iBC, BC, subroutine
47 integer iTurbWall(nshg)
48 integer nTopNodes
49 integer TopSurface(nshg)
247 999 call error ('gendat ','end file',igeom) argument
249 1000 format(a80,//,
252 1100 format(1p,2x,i5,13x,3(1e12.5,7x))
253 2000 format(a80,//,
256 2100 format(1x,i5,5x,i10)