diff --git a/src/define_ov.f90 b/src/define_ov.f90 index e8f70c35305d940ec93964f6a1cf42e9e2ab8ca2..f31251992787f2fb40852e268341846fd50886a0 100644 --- a/src/define_ov.f90 +++ b/src/define_ov.f90 @@ -49,10 +49,11 @@ type (thread) threadinfo integer iproc, nproc, err, ierr, levelv integer nface, nlsf, i, j, k, np, kfix -double precision s,e2d,xlsf,crit,wpreiso,evisc,is_plas +double precision s,e2d,xlsf,crit,wpreiso,evisc integer ioctree_number_of_elements external ioctree_number_of_elements double precision current_time,activation_time +logical is_plas !------------------------------------------------------------------------------| !------------------------------------------------------------------------------|