integer smooth2Dnbt(smoothOpNbMax),
& smooth3Dnbt, smooth2Dnbt,
nbt_in=smooth2Dnbt(smoothOpNb)
nbt_in=smooth2Dnbt(smoothOpNb)/2
smooth2DtotTime=smooth2Dnbt(smoothOpNb)*smooth2DdelTime
& smoothOpNb,smooth2Dnbt(smoothOpNb),
& smooth2Dnbt,
smooth2Dnbt(smoothOpNb)=0