Section NESTED_RAMIF.
Context {cs: compspecs}.

Lemma reptype_Tarray_JMeq_constr2: forall t gfs t0 n a i (v': reptype (nested_field_type t (ArraySubsc i :: gfs))),
legal_nested_field t gfs ->
nested_field_type t gfs = Tarray t0 n a ->
{v: reptype (nested_field_type t (ArraySubsc 0 :: gfs)) |
JMeq v' v}.