007443274048aa92bd22c5556e51f70bcd477eeb
[h316.git] / lib / fortran / script / extractnames
1 #!/bin/bash
2
3 ldc $1 | egrep "^[A-Z].*\((6)|0-0\)"| awk '{print $1}'