Next: User-defined mechanical material laws. Up: User-defined loading Previous: Heat radiation (radiate.f) Contents

###
Temperature (utemp.f)

With this subroutine the user can define a temperature field. It is triggered bythe parameter USER on the *TEMPERATURE card. The header and variable description is as follows:

          subroutine utemp(temp,msecpt,kstep,kinc,time,node,coords,vold)
    !
    !     user subroutine utemp
    !
    !
    !     INPUT:
    !
    !     msecpt             number of temperature values (for volume elements:1)
    !     kstep              step number
    !     kinc               increment number
    !     time(1)            current step time
    !     time(2)            current total time
    !     node               node number
    !     coords(1..3)       global coordinates of the node
    !     vold(0..3,1..nk)   solution field in all nodes
    !                        0: temperature
    !                        1: displacement in global x-direction
    !                        2: displacement in global y-direction
    !                        3: displacement in global z-direction
    !
    !     OUTPUT:
    !
    !     temp(1..msecpt)    temperature in the node
    !