Next: Heat radiation (radiate.f) Up: User-defined loading Previous: Heat convection (film.f) Contents

###
Boundary conditions(uboun.f)

This subroutine is used for user-defined boundary values, characterized by the parameter USER on the *BOUNDARY card. The header and variable description is as follows:

          subroutine uboun(boun,kstep,kinc,time,node,idof,coords,vold,mi)
    !
    !     user subroutine uboun
    !
    !
    !     INPUT:
    !
    !     kstep              step number
    !     kinc               increment number
    !     time(1)            current step time
    !     time(2)            current total time
    !     node               node number
    !     idof               degree of freedom
    !     coords  (1..3)     global coordinates of the node
    !     vold(0..4,1..nk)   solution field in all nodes
    !                        0: temperature
    !                        1: displacement in global x-direction
    !                           (or mass flow rate for fluid nodes)
    !                        2: displacement in global y-direction
    !                        3: displacement in global z-direction
    !                        4: static pressure
    !     mi(1)              max # of integration points per element (max
    !                        over all elements)
    !     mi(2)              max degree of freedomm per node (max over all
    !                        nodes) in fields like v(0:mi(2))...
    !
    !     OUTPUT:
    !
    !     boun               boundary value for degree of freedom idof
    !                        in node "node"
    !