You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
28 lines
879 B
Modula-2
28 lines
879 B
Modula-2
GFORTRAN module created from mvnprodcorrprb.f on Wed Dec 03 15:55:57 2008
|
|
MD5:2bffd45d12c9c1718b19499dd55e4953 -- If you edit this, you'll get what you deserve.
|
|
|
|
(() () () () () () () () () () () () () () () () () () () () () () () ()
|
|
() () ())
|
|
|
|
()
|
|
|
|
()
|
|
|
|
()
|
|
|
|
()
|
|
|
|
(2 'f' 'functioninterface' 'f' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC
|
|
BODY UNKNOWN EXTERNAL FUNCTION) (REAL 8 0 0 REAL ()) 3 0 (4) () 5 () ()
|
|
0 0)
|
|
6 'functioninterface' 'functioninterface' 'functioninterface' 1 ((
|
|
MODULE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN) (UNKNOWN 0 0 0
|
|
UNKNOWN ()) 0 0 () () 0 () () 0 0)
|
|
4 'z' '' 'z' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN UNKNOWN DUMMY) (REAL 8
|
|
0 0 REAL ()) 0 0 () () 0 () () 0 0)
|
|
5 'val' '' 'val' 3 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
|
|
UNKNOWN RESULT) (REAL 8 0 0 REAL ()) 0 0 () () 0 () () 0 0)
|
|
)
|
|
|
|
('f' 0 2 'functioninterface' 0 6)
|