Expanded description
| Topic |
Description |
| Name |
clint |
| Synopsis |
/infobank2/programs/dbase/onoffinused/clint.for |
| Description |
(none) |
| Opens |
open (unit = 92,
* access = 'sequential',
* status = 'unknown',
* form = 'formatted',
* name = fname(1:flen))
|
| Reads |
read (90, '(q,a)', end = 99) flen, fname(1:flen)
read (92, '(q,a)', end = 98) alen, aline(1:alen)
|
| Writes |
write (91, '(a)') fname(1:flen)
|
| Calls |
call openem (1,-1)
|
|