***** input *****
 DelTime= 1.
 rhos(threshold)= 0.1
 Scr= 1.2
 ***** output *****
 Mcond(S=0.9,rhos=0.5) -0.09999999999999998
 Mcond(S=1.1,rhos=0.5) 0.10000000000000009
 Mcond(S=1.3,rhos=0.5) 0.30000000000000004
 Mcond(S=0.9,rhos=0.05) -0.05
 Mcond(S=1.1,rhos=0.05) 0.
 Mcond(S=1.3,rhos=0.05) 0.30000000000000004
 Mcond(S=0.9,rhos=0.0) -0.
 Mcond(S=1.1,rhos=0.0) -0.
 Mcond(S=1.3,rhos=0.0) 0.30000000000000004