Index: LMDZ6/branches/ICOLMDZISO/libf/phylmd/calltherm.F90
===================================================================
--- LMDZ6/branches/ICOLMDZISO/libf/phylmd/calltherm.F90	(revision 5593)
+++ LMDZ6/branches/ICOLMDZISO/libf/phylmd/calltherm.F90	(revision 5594)
@@ -234,5 +234,5 @@
 #ifdef ISO
       if (.not.new_thermcell) then
-           CALL abort_gcm('calltherm 234','isos pas prevus ici',1)
+           CALL abort_physic('calltherm 234','isos pas prevus ici',1)
       endif
 #ifdef ISOVERIF
