segfault when using VERTICAL PROFILES OF SUSPENDED SEDIMENTS : 2

In a run with TELEMAC-3D and GAIA (non-cohesive suspended sediment transport) I got a segfault, when setting VERTICAL PROFILES OF SUSPENDED SEDIMENTS : 2.

The reason is apparently that in TRA_PROF_Z.f CSTAEQ%R is used, whereas now this variable exists for each sediment fraction, such that the reference should be to CSTAEQ%ADR(ISUSP)%P%R