programmer's documentation
 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
Force temperature in a given region

Force temperature in a given region

This is an example of cs_user_extra_operations which sets temperature to 20 in a given region starting at t = 12s

Local variables to be added

integer iel
integer iscal

Body

Do this with precaution... The user is responsible for the validity of results.

Here is the corresponding code:

iscal = iscalt
if (ttcabs .ge. 12.d0) then
if (iscal.gt.0 .and. iscal.le.nscal) then
do iel = 1, ncel
rtp(iel,isca(iscal)) = 20.d0
enddo
endif
write(nfecra,3000)
endif