Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
L
loadbalancing
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Package registry
Container registry
Model registry
Operate
Terraform modules
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
GitLab community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
SLMS
loadbalancing
Merge requests
!12
Feature/amalgamated
Code
Review changes
Check out branch
Download
Patches
Plain diff
Expand sidebar
Closed
Feature/amalgamated
feature/amalgamated
into
refactor
Overview
3
Commits
0
Pipelines
3
Changes
4
Closed
Stephan Schulz
requested to merge
feature/amalgamated
into
refactor
4 years ago
Overview
3
Commits
0
Pipelines
3
Changes
4
The Work in Progress branch for amalgamated header files according to
Wiki link
.
Edited
4 years ago
by
Stephan Schulz
0
0
Merge request reports
Viewing commit
1b1770e4
Show latest version
4 files
+
21
−
1
Inline
Compare changes
Side-by-side
Inline
Show whitespace changes
Show one file at a time
Files
4
1b1770e4
add ALL_finalize to delete all object in Fortran interface
· 1b1770e4
Stephan Schulz
authored
4 years ago
example/ALL_test_f.f90
+
2
−
1
View file @ 1b1770e4
Edit in single-file editor
Open in Web IDE
Show full file
@@ -80,7 +80,7 @@ PROGRAM ALL_test_f
CALL
ALL_setWork
(
obj
,
real
(
product
(
coords
,
1
)
*
64
,
8
)
)
CALL
ALL_setVertices
(
obj
,
vertices
)
! if using a non cartesian communicator, this call would be required
!
CALL ALL_setProcGridParams(obj,coords,dims)
CALL
ALL_setProcGridParams
(
obj
,
coords
,
dims
)
CALL
ALL_setCommunicator
(
obj
,
cart_comm
)
CALL
ALL_setup
(
obj
)
@@ -100,6 +100,7 @@ PROGRAM ALL_test_f
END
IF
END
DO
DEALLOCATE
(
new_vertices
)
CALL
ALL_finalize
(
obj
);
CALL
MPI_FINALIZE
(
error
);
END
PROGRAM
Loading