Skip to content

Commit 268f354

Browse files
committed
Add submit
1 parent cfa6bee commit 268f354

File tree

2 files changed

+8
-0
lines changed

2 files changed

+8
-0
lines changed

fortran/solver/src/main.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,7 @@ program icfpc2025solver
3838
use solver_mod, only: solver_t
3939
type(solver_t) :: solver
4040
call solver%init(arg)
41+
call solver%submit()
4142
end block
4243
end if
4344
end program icfpc2025solver

fortran/solver/src/solver.f90

Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@ module solver_mod
88
type(library_t) :: library
99
contains
1010
procedure :: init
11+
procedure :: submit
1112
end type solver_t
1213
public :: solver_t
1314
contains
@@ -50,4 +51,10 @@ function generate_plans(task) result(plans)
5051
end if
5152
end function generate_plans
5253
end subroutine init
54+
subroutine submit(solver)
55+
use solution_mod, only: solution_t
56+
class(solver_t), intent(inout) :: solver
57+
type(solution_t) :: solution
58+
call solution%init(solver%library)
59+
end subroutine submit
5360
end module solver_mod

0 commit comments

Comments
 (0)