Next: Temperature (utemp.f) Up: User-defined loading Previous: Boundary (uboun.f) Contents

###
Heat radiation (radiate.f)

This subroutine is used for nonuniform radiation heat flux, characterized by distributed load labels of the form RxNUy, cf *RADIATE. The load label can be up to 20 characters long. In particular, y can be used to distinguish different nonuniform radiation patterns. The header and variable description is as follows:

          subroutine radiate(e,sink,temp,kstep,kinc,time,noel,npt,
         &  coords,jltyp,field,nfield,loadtype,node,area,vold)
    !
    !     user subroutine radiate
    !
    !
    !     INPUT:
    !
    !     temp               current temperature value
    !     kstep              step number
    !     kinc               increment number
    !     time(1)            current step time
    !     time(2)            current total time
    !     noel               element number
    !     npt                integration point number
    !     coords(1..3)       global coordinates of the integration point
    !     jltyp              loading face kode:
    !                        11 = face 1
    !                        12 = face 2
    !                        13 = face 3
    !                        14 = face 4
    !                        15 = face 5
    !                        16 = face 6
    !     field              currently not used
    !     nfield             currently not used (value = 1)
    !     loadtype           load type label
    !     node               currently not used
    !     area               currently not used
    !     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:
    !
    !     e(1)               magnitude of the emissivity
    !     e(2)               not used; please do NOT assign any value
    !     sink               sink temperature (need not be defined
    !                        for cavity radiation)
    !