Computer program calculates the effective temperature for a crystalline solid /DETS/

Computer program computes and prints out both the Debye and resulting effective temperatures for each Debye model-dependent average energy per vibrational mode, Debye-Waller factor, and specific heat. The program calculates by the trapezodial rule and then Simpsons rule.