diff --git a/src/problems.jl b/src/problems.jl
index 12c10cb..facdf64 100644
--- a/src/problems.jl
+++ b/src/problems.jl
@@ -106,9 +106,6 @@ julia> prob2 = Problem(Elasticity, 3)
 function Problem{P<:FieldProblem}(::Type{P}, name::AbstractString, dimension::Int64)
     return Problem{P}(name, dimension, "none", [], Dict(), Assembly(), Dict(), Vector(), P())
 end
-function Problem{P<:FieldProblem}(::Type{P}, dimension::Int64)
-    return Problem(P, "$P problem", dimension)
-end
 
 """ Construct a new boundary problem.
 
@@ -122,12 +119,6 @@ solver.
 function Problem{P<:BoundaryProblem}(::Type{P}, name, dimension, parent_field_name)
     return Problem{P}(name, dimension, parent_field_name, [], Dict(), Assembly(), Dict(), Vector(), P())
 end
-function Problem{P<:BoundaryProblem}(::Type{P}, main_problem::Problem)
-    name = "$P problem"
-    dimension = get_unknown_field_dimension(main_problem)
-    parent_field_name = get_unknown_field_name(main_problem)
-    return Problem{P}(name, dimension, parent_field_name, [], Dict(), Assembly(), Dict(), Vector(), P())
-end
 
 function get_formulation_type(problem::Problem)
     return :incremental
diff --git a/test/test_modal_analysis.jl b/test/test_modal_analysis.jl
index 7bac02f..8d981b7 100644
--- a/test/test_modal_analysis.jl
+++ b/test/test_modal_analysis.jl
@@ -25,10 +25,10 @@ function get_model()
     update!(e2, "displacement 1" => 0.0)
     update!(e2, "displacement 2" => 0.0)
     update!(e2, "displacement 3" => 0.0)
-    p1 = Problem(Elasticity, 3)
+    p1 = Problem(Elasticity, "test problem", 3)
     p1.properties.finite_strain = false
     p1.properties.geometric_stiffness = false
-    p2 = Problem(Dirichlet, p1)
+    p2 = Problem(Dirichlet, "boundary condition", 3, "displacement")
     push!(p1, e1)
     push!(p2, e2)
     solver = Solver(Modal)
diff --git a/test/test_problem.jl b/test/test_problem.jl
index 76c45cc..a6cc7e8 100644
--- a/test/test_problem.jl
+++ b/test/test_problem.jl
@@ -6,7 +6,7 @@ using JuliaFEM.Testing
 
 @testset "test initialize scalar field problem" begin
     el = Element(Seg2, [1, 2])
-    pr = Problem(Heat, 1)
+    pr = Problem(Heat, "heat problem", 1)
     push!(pr, el)
     initialize!(pr)
     @test haskey(el, "temperature")
@@ -19,7 +19,7 @@ end
 
 @testset "test initialize vector field problem" begin
     el = Element(Seg2, [1, 2])
-    pr = Problem(Elasticity, 2)
+    pr = Problem(Elasticity, "elasticity problem", 2)
     push!(pr, el)
     initialize!(pr)
     @test haskey(el, "displacement")