added thermalconductivity.f90