--- trunk/Sources/phylmd/CV3_routines/cv3_tracer.f 2015/04/29 15:47:56 134 +++ trunk/Sources/phylmd/CV3_routines/cv3_tracer.f 2015/05/26 17:46:03 139 @@ -4,12 +4,12 @@ contains - SUBROUTINE cv3_tracer(nloc, len, ncum, nd, na, ment, sij, da, phi) + SUBROUTINE cv3_tracer(nloc, ncum, na, ment, sij, da, phi) implicit none ! Inputs: - integer, intent(in):: ncum, nd, na, nloc, len + integer, intent(in):: ncum, na, nloc real ment(nloc, na, na), sij(nloc, na, na) ! Ouputs: