Changeset 100


Ignore:
Timestamp:
Jul 1, 2010 2:49:33 PM (13 years ago)
Author:
vondreel
Message:

add histogram2d.for
fix polymask.for

Location:
trunk/fsource
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/fsource/polymask.for

    r97 r100  
    44Cf2py intent(in) X
    55Cf2py depend(N) X
    6 Cf2py intent(in) X
     6Cf2py intent(in) Y
    77Cf2py depend(N) Y
    88Cf2py intent(in) M
    … …  
    1717      REAL*8       POLY(0:M-1,0:1)
    1818      LOGICAL*1    MASK(N)
     19
    1920      INTEGER*4    I,K
    2021      REAL*4       P1X,P1Y,P2X,P2Y,XINTERS
Note: See TracChangeset for help on using the changeset viewer.