_RL mult_profiles(NFILESPROFMAX,NVARMAX)
& mult_profiles
& mult_profiles,
mult_profiles(num_file,num_var) = 0. _d 0
& + mult_profiles(num_file,num_var)