Skip to content

Commit 2b252cb

Browse files
authored
Merge pull request #752 from stefaniereuter/feature/adapt-to-multio-2.6.0-api
adapt the metadata for multio 2.6.0
2 parents fa2c29a + 5ff8faa commit 2b252cb

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

src/ifs_interface/iom.F90

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -297,9 +297,9 @@ SUBROUTINE iom_send_fesom_domains(partit, mesh)
297297
CALL ctl_stop('send_fesom_domains: ngrid, md%set_string(representation) failed: ', multio_error_string(cerr))
298298
END IF
299299

300-
cerr = md%set("globalSize", mesh%nod2D)
300+
cerr = md%set("misc-globalSize", mesh%nod2D)
301301
IF (cerr /= MULTIO_SUCCESS) THEN
302-
CALL ctl_stop('send_fesom_domains: ngrid, md%set_int(globalSize) failed: ', multio_error_string(cerr))
302+
CALL ctl_stop('send_fesom_domains: ngrid, md%set_int(misc-globalSize) failed: ', multio_error_string(cerr))
303303
END IF
304304

305305
cerr = md%set("toAllServers", .TRUE._1)
@@ -339,9 +339,9 @@ SUBROUTINE iom_send_fesom_domains(partit, mesh)
339339
CALL ctl_stop('send_fesom_domains: egrid, md%set_string(representation) failed: ', multio_error_string(cerr))
340340
END IF
341341

342-
cerr = md%set("globalSize", mesh%elem2D)
342+
cerr = md%set("misc-globalSize", mesh%elem2D)
343343
IF (cerr /= MULTIO_SUCCESS) THEN
344-
CALL ctl_stop('send_fesom_domains: egrid, md%set_int(globalSize) failed: ', multio_error_string(cerr))
344+
CALL ctl_stop('send_fesom_domains: egrid, md%set_int(misc-globalSize) failed: ', multio_error_string(cerr))
345345
END IF
346346

347347
cerr = md%set("toAllServers", .TRUE._1)
@@ -381,9 +381,9 @@ SUBROUTINE iom_send_fesom_data(data)
381381
CALL ctl_stop('send_fesom_data: md%set_string(category) failed: ', multio_error_string(cerr))
382382
END IF
383383

384-
cerr = md%set("globalSize", data%globalSize)
384+
cerr = md%set("misc-globalSize", data%globalSize)
385385
IF (cerr /= MULTIO_SUCCESS) THEN
386-
CALL ctl_stop('send_fesom_data: md%set_int(globalSize) failed: ', multio_error_string(cerr))
386+
CALL ctl_stop('send_fesom_data: md%set_int(misc-globalSize) failed: ', multio_error_string(cerr))
387387
END IF
388388

389389
cerr = md%set("level", data%level)

0 commit comments

Comments
 (0)