Searched defs:genini (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | genini.f | 1 subroutine genini (iBC, BC, y, ac, iper, ilwork, subroutine
48 character*20 fname1
49 character*10 cname2
50 character*5 cname
172 1000 format(a80,//,
176 1100 format(1p,2x,i5,5x,5(e12.5,2x))
|