Changeset 1058


Ignore:
Timestamp:
2008-06-04T21:14:34+02:00 (13 years ago)
Author:
rblod
Message:

Correct preprocessing syntax, see ticket #160

Location:
trunk/NEMO/OPA_SRC
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/OPA_SRC/BDY/bdy_oce.F90

    r911 r1058  
    44   !! Unstructured Open Boundary Cond. :   define related variables 
    55   !!====================================================================== 
    6 #if defined key_bdy || key_bdy_tides 
     6#if defined key_bdy || defined key_bdy_tides 
    77   !!---------------------------------------------------------------------- 
    88   !!   'key_bdy' :                    Unstructured Open Boundary Condition 
  • trunk/NEMO/OPA_SRC/BDY/bdy_par.F90

    r911 r1058  
    44   !! Unstructured Open Boundary Cond. :   define related parameters 
    55   !!====================================================================== 
    6 #if defined key_bdy || key_bdy_tides 
     6#if defined key_bdy || defined key_bdy_tides 
    77   !!---------------------------------------------------------------------- 
    88   !!   'key_bdy' :                    Unstructured Open Boundary Condition 
  • trunk/NEMO/OPA_SRC/BDY/bdydta.F90

    r911 r1058  
    44   !! Open boundary data : read the data for the unstructured open boundaries. 
    55   !!============================================================================== 
    6 #if defined key_bdy || key_bdy_tides 
     6#if defined key_bdy || defined key_bdy_tides 
    77   !!------------------------------------------------------------------------------ 
    88   !!   'key_bdy'         :                   Unstructured Open Boundary Conditions 
  • trunk/NEMO/OPA_SRC/DOM/domvvl.F90

    r911 r1058  
    293293      END DO 
    294294 
    295 #if defined key_obc && ( key_dynspg_exp || key_dynspg_ts ) 
     295#if defined key_obc && ( defined key_dynspg_exp || defined key_dynspg_ts ) 
    296296      ! open boundaries (div must be zero behind the open boundary) 
    297297      !  mpp remark: The zeroing of hdiv can probably be extended to 1->jpi/jpj for the correct row/column 
     
    302302#endif 
    303303 
    304 #if defined key_bdy || key_bdy_tides 
     304#if defined key_bdy || defined key_bdy_tides 
    305305      DO jj = 1, jpj 
    306306         DO ji = 1, jpi 
  • trunk/NEMO/OPA_SRC/DYN/divcur.F90

    r1056 r1058  
    136136#endif 
    137137#endif          
    138 #if defined key_bdy || key_bdy_tides 
     138#if defined key_bdy || defined key_bdy_tides 
    139139         ! unstructured open boundaries (div must be zero behind the open boundary) 
    140140         DO jj = 1, jpj 
     
    354354#endif 
    355355#endif          
    356 #if defined key_bdy || key_bdy_tides 
     356#if defined key_bdy || defined key_bdy_tides 
    357357         ! unstructured open boundaries (div must be zero behind the open boundary) 
    358358         DO jj = 1, jpj 
  • trunk/NEMO/OPA_SRC/DYN/dynspg.F90

    r789 r1058  
    163163      ENDIF 
    164164 
    165 #if key_obc 
     165#if defined key_obc 
    166166      ! Conservation of ocean volume (key_dynspg_flt) 
    167167      ! --------------------------------------------- 
Note: See TracChangeset for help on using the changeset viewer.