G95 module created from f2kcli.f90 on Mon Jul 19 14:41:44 2004
If you edit this, you'll get what you deserve.

(() () () () () () () () () () () () () () () () () () () ())

()

()

()

(2 'command_argument_count' 'f2kcli' 1 ((PROCEDURE UNKNOWN MODULE-PROC
DECL FUNCTION) (INTEGER 4 ()) 0 0 () () () () ())
3 'get_command' 'f2kcli' 1 ((PROCEDURE UNKNOWN MODULE-PROC DECL
SUBROUTINE) (PROCEDURE 0 ()) 0 0 (4 5 6) () () () ())
7 'get_command_argument' 'f2kcli' 1 ((PROCEDURE UNKNOWN MODULE-PROC DECL
SUBROUTINE) (PROCEDURE 0 ()) 0 0 (8 9 10 11) () () () ())
12 'f2kcli' 'f2kcli' 1 ((MODULE UNKNOWN UNKNOWN UNKNOWN) (UNKNOWN 0 ())
0 0 () () () () ())
5 'length' '' 13 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
INTEGER 4 ()) 0 0 () () () () ())
4 'command' '' 13 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
CHARACTER 1 (())) 0 0 () () () () ())
9 'value' '' 14 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
CHARACTER 1 (())) 0 0 () () () () ())
11 'status' '' 14 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
INTEGER 4 ()) 0 0 () () () () ())
10 'length' '' 14 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
INTEGER 4 ()) 0 0 () () () () ())
8 'number' '' 14 ((VARIABLE IN UNKNOWN UNKNOWN DUMMY) (INTEGER 4 ()) 0 0
() () () () ())
6 'status' '' 13 ((VARIABLE OUT UNKNOWN UNKNOWN OPTIONAL DUMMY) (
INTEGER 4 ()) 0 0 () () () () ())
)

('f2kcli' 0 12 'command_argument_count' 0 2 'get_command_argument' 0 7
'get_command' 0 3)