Changeset 12787


Ignore:
Timestamp:
2020-04-21T12:51:21+02:00 (6 months ago)
Author:
rrenshaw
Message:

fix

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_obs_oper_update_reanalysis4/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r12786 r12787  
    454454      ELSE 
    455455         zssh_frc(:,:) = zraur * z1_2 * (  emp(:,:) + emp_b(:,:) - rnf(:,:) - rnf_b(:,:)   & 
    456                 &                        + rdivisf * ( fwfisf(:,:) + fwfisf_b(:,:) )       ) 
     456                &                        + fwfisf(:,:) + fwfisf_b(:,:)                     ) 
    457457      ENDIF 
    458458      !                                   !* Fill boundary data arrays with AGRIF 
Note: See TracChangeset for help on using the changeset viewer.