Searched defs:mshcksn (Results 1 – 1 of 1) sorted by relevance
| /dports/cad/feappv/feappv-4.1i/program/ |
| H A D | meshck.f | 201 subroutine mshcksn(is,iblend,numsd,numsn,numbd,errs) subroutine
207 logical errs
208 integer numsd,numsn,numbd,n,i,inc
209 integer is(16,numsd),iblend(21,numbd)
242 2000 format(' *ERROR* SIDE',i5,' has value greater than maximum SNODE'
245 2001 format(' *ERROR* BLENd',i5,' has value greater than maximum SNODE'
|