From bc3ca864db76c1383207433838cbef288444d228 Mon Sep 17 00:00:00 2001 From: Teodoro Laino Date: Wed, 26 Sep 2007 12:45:49 +0000 Subject: [PATCH] still to early for CSVR thermostat ;-) svn-origin-rev: 6370 --- src/md.F | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/md.F b/src/md.F index c5244239c0..a0ec840678 100644 --- a/src/md.F +++ b/src/md.F @@ -435,6 +435,9 @@ CPSourceFileRef,& CALL section_vals_val_get(tmp_section,"TIMECON",r_val=simpar%tau_nhc,error=error) CALL section_vals_val_get(tmp_section,"MTS",i_val=simpar%nc,error=error) CASE (do_thermo_csvr) + CALL cp_unimplemented_error(fromWhere=routineP, & + message="CSVR thermostat not implemented yet!", & + error=error, error_level=cp_fatal_level) ! Canonical Sampling through velocity rescaling tmp_section => section_vals_get_subs_vals(thermostat_section,"CSVR",error=error) CALL section_vals_val_get(tmp_section,"TIMECON",r_val=simpar%tau_nhc,error=error)