Changeset 1840 for LMDZ5


Ignore:
Timestamp:
Aug 9, 2013, 3:53:19 PM (11 years ago)
Author:
lguez
Message:

Allow not to compile FFT files for the sequential version.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/filtrez/filtreg_mod.F90

    r1685 r1840  
    1010
    1111  SUBROUTINE inifilr
     12#ifdef CPP_PARA
    1213  USE mod_filtre_fft, ONLY : use_filtre_fft,Init_filtre_fft
    1314  USE mod_filtre_fft_loc, ONLY : Init_filtre_fft_loc=>Init_filtre_fft    !
     15#endif
    1416    !    ... H. Upadhyaya, O.Sharma   ...
    1517    !
    … …  
    538540    ENDDO ! of DO j = jfiltsu, jjm
    539541
     542#ifdef CPP_PARA
    540543    IF (use_filtre_fft) THEN
    541544       CALL Init_filtre_fft(coefilu,modfrstu,jfiltnu,jfiltsu,  &
    … …  
    544547                           coefilv,modfrstv,jfiltnv,jfiltsv)
    545548    ENDIF
    546 
     549#endif
    547550    !   ...................................................................
    548551
Note: See TracChangeset for help on using the changeset viewer.