(a, var)
| 414 | |
| 415 | |
| 416 | def getarrdocsign(a, var): |
| 417 | ctype = getctype(var) |
| 418 | if isstring(var) and (not isarray(var)): |
| 419 | sig = '%s : rank-0 array(string(len=%s),\'c\')' % (a, |
| 420 | getstrlength(var)) |
| 421 | elif isscalar(var): |
| 422 | sig = '%s : rank-0 array(%s,\'%s\')' % (a, c2py_map[ctype], |
| 423 | c2pycode_map[ctype],) |
| 424 | elif isarray(var): |
| 425 | dim = var['dimension'] |
| 426 | rank = repr(len(dim)) |
| 427 | sig = '%s : rank-%s array(\'%s\') with bounds (%s)' % (a, rank, |
| 428 | c2pycode_map[ |
| 429 | ctype], |
| 430 | ','.join(dim)) |
| 431 | return sig |
| 432 | |
| 433 | |
| 434 | def getinit(a, var): |
no test coverage detected