Changeset 1219 for palm/trunk/SOURCE


Ignore:
Timestamp:
Aug 30, 2013 9:33:18 AM (11 years ago)
Author:
heinze
Message:

bugfix: use own branch for fftw setting

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/fft_xy.f90

    r1217 r1219  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! bugfix: use own branch for fftw
    2323!
    2424! Former revisions:
     
    123123    INTEGER(C_INT), SAVE ::  plan_xf, plan_xi, plan_yf, plan_yi
    124124    INTEGER, SAVE        ::  total_points_x_transpo, total_points_y_transpo
    125 #elif defined( __fftw )
     125#endif
     126
     127#if defined( __fftw )
    126128    INCLUDE  'fftw3.f03'
    127129    INTEGER(KIND=C_INT) ::  nx_c, ny_c
Note: See TracChangeset for help on using the changeset viewer.