FUNCTION loss_cond, A, L, T
   ;Conductive cooling energy loss rate
   ;L_cond = 4* (A/L) * Ko * T^(7/2) erg s^-1
   ; Boltzmann constant - k = 1.38e-16 erg K^-1
   k = 1.38e-16
   Ko = 1.e-6

   RETURN, 4 * (A/L) * Ko * T^(7/2)
END