Changeset 8138 for branches/2017/dev_r8126_UKMO_AGRIF_vert_interp/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modupdate.F90
- Timestamp:
- 2017-06-05T12:01:03+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8126_UKMO_AGRIF_vert_interp/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modupdate.F90
r5656 r8138 582 582 nbdim, memberinall, coords, & 583 583 sendtoproc1,recvfromproc1, & 584 tab4t(:,:,5),tab4t(:,:,6),tab4t(:,:,7),tab4t(:,:,8)) 584 tab4t(:,:,5),tab4t(:,:,6),tab4t(:,:,7),tab4t(:,:,8), & 585 tab4t(:,:,1),tab4t(:,:,2)) 585 586 endif 586 587 … … 1154 1155 nbdim, memberinall2, coords, & 1155 1156 sendtoproc2, recvfromproc2, & 1156 tab5t(:,:,5),tab5t(:,:,6),tab5t(:,:,7),tab5t(:,:,8)) 1157 tab5t(:,:,5),tab5t(:,:,6),tab5t(:,:,7),tab5t(:,:,8), & 1158 tab5t(:,:,1),tab5t(:,:,2)) 1157 1159 1158 1160 call Agrif_Addto_list_update(child%list_update,pttab,petab,lb_child,lb_parent, &
Note: See TracChangeset
for help on using the changeset viewer.