Changeset 7428 for branches/2016

Timestamp:

2016-12-01T19:03:22+01:00 (7 years ago)

Author:

flavoni

Message:

correct mppini_2.h90: rmeoved jpizoom does note exist anymore

File:

• branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/LBC/mppini_2.h90 (modified) (1 diff)

branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/LBC/mppini_2.h90

@@ -117 +117 @@
       IF( ln_bdy .AND. ln_mask_file ) THEN
          CALL iom_open( cn_mask_file, inum )
-         CALL iom_get ( inum, jpdom_unknown, 'bdy_msk', zdta(:,:), kstart=(/jpizoom,jpjzoom/), kcount=(/jpiglo,jpjglo/) )
+         CALL iom_get ( inum, jpdom_unknown, 'bdy_msk', zdta(:,:) )
          CALL iom_close( inum )
          WHERE ( zdta(:,:) <= 0. ) imask = 0