Next: Heat convection (film.f) Up: User-defined loading Previous: Distributed flux (dflux.f) Contents

###
Distribruted load (dload.f)

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

          subroutine dload(f,kstep,kinc,time,noel,npt,layer,kspt,
         &     coords,jltyp,loadtype)
    !
    !     user subroutine dload
    !
    !
    !     INPUT:
    !
    !     kstep              step number
    !     kinc               increment number
    !     time(1)            current step time
    !     time(2)            current total time
    !     noel               element number
    !     npt                integration point number
    !     layer              currently not used
    !     kspt               currently not used
    !     coords(1..3)       global coordinates of the integration point
    !     jltyp              loading face kode:
    !                        21 = face 1
    !                        22 = face 2
    !                        23 = face 3
    !                        24 = face 4
    !                        25 = face 5
    !                        26 = face 6
    !     loadtype           load type label
    !
    !     OUTPUT:
    !
    !     f                  magnitude of the distributed load