| Call External Query [message #11443] |
Wed, 15 April 1998 00:00 |
DMottershead
Messages: 17
Registered: January 1998
|
Junior Member |
|
|
I am having problems running the call external example shown in the IDL
Users Guide (18-27). What I have is a function called MY_AVG shown
below:
REAL*4 FUNCTION MY_AVG(V, N)
REAL*4 V(*)
MY_AVG = 0.0
DO I=1,N
MY_AVG = MY_AVG + V(I)
END DO
MY_AVG = MY_AVG / N
RETURN
END
I follow the commands on 18-28 VMS DCL commands:
$ FORTRAN MY_AVG
$ LINK MY_AVG, SYS$OUTPUT/OPT/SHARE
UNIVERSAL = MY_AVG
$ DEFINE MY_AVG_EXE dduu:[xxx]MY_AVG.EXE
Then I call IDL using the command
IDL> call_external(/f_value, value = [0B, 1B], 'MY_AVG_EXE', $
IDL> 'MY_AVG', findgen(10), 10L)
It this stage I get a message saying:
%LIB-E, key not found in tree
% Call_EXTERNAL: Error in called routine.
% Execution halted at: $MAIN$
Now I know that looking a tree might not be the most obvious place a key
might reside but really!!
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
|
|
|
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
