Changeset 9515


Ignore:
Timestamp:
2018-04-27T14:56:20+02:00 (2 years ago)
Author:
dancopsey
Message:

Do not use halos in area calculations.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_new_runoff_coupling/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_rnf_1d.F90

    r9314 r9515  
    112112      ALLOCATE( rivers%river_area( nn_cpl_river ) ) 
    113113      rivers%river_area(:) = 0.0 
    114       DO ii = 1, jpi 
    115         DO jj = 1, jpj 
     114      DO ii = nldi, nlei       
     115        DO jj = nldj, nlej 
    116116          IF ( rivers%river_number(ii,jj) > 0 .AND. rivers%river_number(ii,jj) <= nn_cpl_river ) THEN 
    117117            rivers%river_area(rivers%river_number(ii,jj)) = rivers%river_area(rivers%river_number(ii,jj)) + e1e2t(ii,jj) 
Note: See TracChangeset for help on using the changeset viewer.