Preciso criar uma instância atualizada a partir de uma instância de classe de caso (com qualquerDecodeJsons derivados implicitamente), dado um json incompleto (alguns campos estão faltando). Como isso pode ser feito com o Argonaut (de preferência) ou com o Circe (se for necessário)?

Exemplo:

case class Person(name:String, age:Int)
val person = Person("mr complete", 42)
val incompletePersonJson = """{"name":"mr updated"}"""
val updatedPerson = updateCaseClassFromIncompleteJson(person, incompletePersonJson)

println(updatedPerson)
//yields Person(mr updated, 42) 

Tenho certeza de que preciso analisar o json em json AST e convertê-lo em ShapelessLabelledGeneric, use a atualização Shapeless de alguma forma para atualizar a instância da classe de caso.

Editar 2

Depois de ler a fonte Shapeless, descobri que posso gerar meu próprio objeto "Padrão". Consegui criar uma solução que requer que a instância da classe case esteja presente ao analisar o json. Eu esperava evitar isso e, em vez disso, fornecer o instante, mais tarde. Enfim, aqui está:

import shapeless._
import argonaut._
import ArgonautShapeless._
import shapeless.ops.hlist.Mapper

case class Person(name: String, age: Int)

object MkDefault {

  object toSome extends Poly1 {
    implicit def default[P] = at[P](Some(_))
  }

  def apply[P, L <: HList, D <: HList]
  (p: P)
  (implicit
   g: Generic.Aux[P, L],
   mpr: Mapper.Aux[toSome.type, L, D]
  ): Default.Aux[P, mpr.Out] =
    Default.mkDefault[P, D](mpr(g.to(p)))
}


object Testy extends App {
    implicit val defs0 = MkDefault(Person("new name? NO", 42))
    implicit def pd = DecodeJson.of[Person]
    val i = """{"name":"Old Name Kept"}"""
    val pp = Parse.decodeOption[Person](i).get
    println(pp)
}

Isso geraPerson(Old Name Kept,42).