CalculiX  2.8 A Free Software Three-Dimensional Structural Finite Element Program
initialconditionss.f File Reference

Go to the source code of this file.

## Functions/Subroutines

subroutine initialconditionss (inpc, textpart, set, istartset, iendset, ialset, nset, t0, t1, prestr, iprestr, ithermal, veold, inoelfree, nk_, mi, istep, istat, n, iline, ipol, inl, ipoinp, inp, lakon, kon, co, ne, ipkon, vold, ipoinpc, xstate, nstate_, nk, t0g, t1g)

## Function/Subroutine Documentation

 subroutine initialconditionss ( character*1, dimension(*) inpc, character*132, dimension(16) textpart, character*81, dimension(*) set, integer, dimension(*) istartset, integer, dimension(*) iendset, integer, dimension(*) ialset, integer nset, real*8, dimension(*) t0, real*8, dimension(*) t1, real*8, dimension(6,mi(1),*) prestr, integer iprestr, integer ithermal, real*8, dimension(0:mi(2),*) veold, integer inoelfree, integer nk_, integer, dimension(*) mi, integer istep, integer istat, integer n, integer iline, integer ipol, integer inl, integer, dimension(2,*) ipoinp, integer, dimension(3,*) inp, character*8, dimension(*) lakon, integer, dimension(*) kon, real*8, dimension(3,*) co, integer ne, integer, dimension(*) ipkon, real*8, dimension(0:mi(2),*) vold, integer, dimension(0:*) ipoinpc, real*8, dimension(nstate_,mi(1),*) xstate, integer nstate_, integer nk, real*8, dimension(2,*) t0g, real*8, dimension(2,*) t1g )
Hosted by OpenAircraft.com, (Michigan UAV, LLC)