GFORTRAN module created from nusdas.f90 on Thu May 30 10:03:33 2013 If you edit this, you'll get what you deserve. (() () () () () () () () () () () () () () () () () () () () ()) () (('nus_read_2d' '' 2 3 4) ('nus_read_meridional' '' 5)) () () (2 'nus_read_2d_d' 'n3newapi' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC DECL SUBROUTINE) (UNKNOWN 0 ()) 6 0 (7 8 9 10 11 12 13 14 15 16 17) () 0 () ()) 4 'nus_read_2d_i' 'n3newapi' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC DECL SUBROUTINE) (UNKNOWN 0 ()) 18 0 (19 20 21 22 23 24 25 26 27 28 29) () 0 () ()) 5 'nus_read_meridional_r' 'n3newapi' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC DECL SUBROUTINE) (UNKNOWN 0 ()) 30 0 (31 32 33 34 35 36 37 38 39 40 41) () 0 () ()) 42 'nusdas' 'nusdas' 1 ((MODULE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN) ( UNKNOWN 0 ()) 0 0 () () 0 () ()) 3 'nus_read_2d_r' 'n3newapi' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC DECL SUBROUTINE) (UNKNOWN 0 ()) 43 0 (44 45 46 47 48 49 50 51 52 53 54) () 0 () ()) 55 'nus_read_2d_packed' 'n3newapi' 1 ((PROCEDURE UNKNOWN-INTENT EXTERNAL-PROC UNKNOWN EXTERNAL SUBROUTINE) (UNKNOWN 0 ()) 0 0 () () 0 () ()) 56 'packinfolen' 'n3newapi' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN) (INTEGER 4 ()) 0 0 () (CONSTANT (INTEGER 4 ()) 0 '1') () 0 () ()) 57 'n3newapi' 'n3newapi' 1 ((MODULE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN) (UNKNOWN 0 ()) 0 0 () () 0 () ()) 7 'type1' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 ( ())) 0 0 () () 0 () ()) 9 'type3' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 ( ())) 0 0 () () 0 () ()) 10 'basetime' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 11 'm' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 15 'value' '' 6 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DIMENSION DUMMY) ( REAL 8 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4 ()) 0 16 ())) 0 () ()) 16 'vsize' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 8 'type2' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 ( ())) 0 0 () () 0 () ()) 14 'z' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 44 'type1' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 48 'm' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 45 'type2' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 46 'type3' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 17 'iostat' '' 6 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 12 'v' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 49 'v' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 47 'basetime' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 54 'iostat' '' 43 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 20 'type2' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 19 'type1' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 52 'value' '' 43 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DIMENSION DUMMY) ( REAL 4 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4 ()) 0 53 ())) 0 () ()) 25 'e' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 22 'basetime' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 21 'type3' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 26 'z' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 28 'vsize' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 27 'value' '' 18 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DIMENSION DUMMY) ( INTEGER 4 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') ( VARIABLE (INTEGER 4 ()) 0 28 ())) 0 () ()) 29 'iostat' '' 18 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 31 'type1' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 51 'z' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 34 'basetime' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 35 'm' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 36 'v' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 37 'e' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 40 'vsize' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 38 'iy' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 33 'type3' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 41 'iostat' '' 30 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 39 'value' '' 30 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DIMENSION DUMMY) ( REAL 4 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4 ()) 0 40 ())) 0 () ()) 32 'type2' '' 30 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 13 'e' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 23 'm' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) 24 'v' '' 18 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 53 'vsize' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 () () 0 () ()) 50 'e' '' 43 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (CHARACTER 1 (())) 0 0 () () 0 () ()) ) ('n3newapi' 0 57 'packinfolen' 0 56 'nus_read_2d_packed' 0 55 'nus_read_2d_i' 0 4 'nus_read_2d_d' 0 2 'nus_read_2d_r' 0 3 'nusdas' 0 42 'nus_read_meridional_r' 0 5)