diff --git a/src/MNH/write_budget.f90 b/src/MNH/write_budget.f90 index 558e573b5f4e57ee793e3a5ddcc68b80e545d3ba..e1827696fe3b51d9f53a6ed370e61793a2c687bd 100644 --- a/src/MNH/write_budget.f90 +++ b/src/MNH/write_budget.f90 @@ -425,7 +425,7 @@ subroutine Store_one_budget_rho( tpdiafile, tpdates, tprhodj, kp, knocompress, p write( ygroup_name, fmt = "('RJX__',I4.4)" ) nbutshift case( NBUDGET_V ) - write( ygroup_name, fmt = "('RJX__',I4.4)" ) nbutshift + write( ygroup_name, fmt = "('RJY__',I4.4)" ) nbutshift case( NBUDGET_W ) write( ygroup_name, fmt = "('RJZ__',I4.4)" ) nbutshift