[f2py] Fw: Initializing 2D-array when dimension NxM is passed to subroutine

----- Original Message ----- 
From: kalman_g 
To: f2py-users-Y4l6ocDipWCuvFJfX82//[email protected] 
Sent: Wednesday, November 10, 2010 12:55 PM
Subject: Initializing 2D-array when dimension NxM is passed to subroutine


OS: Windows

The following will NOT compile&link:

See File:  RUN.BAT:
===============
-------
python C:\Python26\Lib\site-packages\numpy\f2py\f2py.py ^
                         --build-dir .\tmp ^
                         --fcompiler=gnu95 ^
                          -c lib1.f90 -m lib1
pause
----------------------------------

See File: LIB1.F90:
================

MODULE lib12

CONTAINS

   !--------------------------------------------
    SUBROUTINE MTX(B,N,M)

     INTEGER, INTENT(IN) ::N,M
     INTEGER, DIMENSION(N,M), INTENT(OUT) :: B 
      INTEGER, DIMENSION(N,M) :: C
     INTEGER :: i,j

    DO i=1,N
        DO=1,M
            C(i,j)=1
        END DO
   END DO

   B=C

   END SUBROUTINE MTX
   !--------------------------------------------------
end MODULE lib12


****************************
Of course, it is a different story when calling the sub as:

SUBROUTINE MTX(A,B,N,M)

with

INTEGER, DIMENSION(N,M), INTENT(IN) :: A

----

i.e. when an array A is passed to the sub & A was already initialized in the calling module (say, test.py)


******************************

So the QUESTION is:

How can one itialize a 2D-array  INSIDE a sub, when only the dimension NxM is passed to subroutine?


*********************************

Thanks

G. Kalman
[email protected]

_______________________________________________
f2py-users mailing list
f2py-users-Y4l6ocDipWCuvFJfX82//[email protected]
http://cens.ioc.ee/mailman/listinfo/f2py-users