t_excsao.x:	    call mfree (shtemp, TY_REAL)
t_excsao.x:	    call mfree (wltemp, TY_REAL)
t_pxcsao.x:	    call mfree (shtemp, TY_REAL)
t_pxcsao.x:	    call mfree (wltemp, TY_REAL)
t_xcsao.x:	    call mfree (shtemp, TY_REAL)
t_xcsao.x:	    call mfree (wltemp, TY_REAL)
xcfit.x:		call mfree (shtemp, TY_REAL)
xcfit.x:		call mfree (wltemp, TY_REAL)
