dfac_mem_dynamic.F File Reference

Go to the source code of this file.

Modules
module	dmumps_dynamic_memory_m

Functions/Subroutines
subroutine	dmumps_dynamic_memory_m::dmumps_dm_set_dynptr (cb_state, a, la, pamaster_or_ptrast, ixxd, ixxr, son_a, iachk, recsize)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_pamasterorptrast (n, slavef, myid, keep28, keep199, inode, cb_state, ixxd, step, dad, procnode_steps, rcurrent, pamaster, ptrast, is_pamaster, is_ptrast)
logical function	dmumps_dynamic_memory_m::dmumps_dm_isband (xxstate)
logical function	dmumps_dynamic_memory_m::dmumps_dm_is_dynamic (ixxd)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_fac_alloc_allowed (mem_count_to_allocate, keep8, iflag, ierror)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_cbstatic2dynamic (strategy, sizer_needed, skip_top_stack, myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, a, la, lrlu, iptrlu, lrlus, step, ptrast, pamaster, procnode_steps, dad, iflag, ierror)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_freealldynamiccb (myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, step, ptrast, pamaster, procnode_steps, dad, atomic_updates)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_set_ptr (address, sizfr8, cbptr)
subroutine	dmumps_dynamic_memory_m::dmumps_dm_free_block (xxg_status, dynptr, sizfr8, atomic_updates, keep8)
subroutine	dmumps_dm_freealldynamiccb_i (myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, step, ptrast, pamaster, procnode_steps, dad, atomic_updates)
subroutine	dmumps_dm_cbstatic2dynamic_i (strategy, sizer_needed, skip_top_stack, myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, a, la, lrlu, iptrlu, lrlus, step, ptrast, pamaster, procnode_steps, dad, iflag, ierror)

Function/Subroutine Documentation

dmumps_dm_cbstatic2dynamic_i()

subroutine dmumps_dm_cbstatic2dynamic_i	(	integer, intent(in)	strategy,
		integer(8), intent(in)	sizer_needed,
		logical, intent(in)	skip_top_stack,
		integer, intent(in)	myid,
		integer, intent(in)	n,
		integer, intent(in)	slavef,
		integer, dimension(500), intent(in)	keep,
		integer(8), dimension(150), intent(inout)	keep8,
		integer, dimension( liw ), intent(inout)	iw,
		integer	liw,
		integer	iwposcb,
		integer	iwpos,
		double precision, dimension( la ), intent(in)	a,
		integer(8)	la,
		integer(8)	lrlu,
		integer(8)	iptrlu,
		integer(8)	lrlus,
		integer, dimension(n), intent(in)	step,
		integer(8), dimension(keep(28)), intent(inout)	ptrast,
		integer(8), dimension(keep(28)), intent(inout)	pamaster,
		integer, dimension(keep(28)), intent(in)	procnode_steps,
		integer, dimension(keep(28)), intent(in)	dad,
		integer, intent(inout)	iflag,
		integer, intent(inout)	ierror )

Definition at line 474 of file dfac_mem_dynamic.F.

      USE dmumps_dynamic_memory_m, ONLY : dmumps_dm_cbstatic2dynamic
      IMPLICIT NONE
      INTEGER, INTENT(in)  :: STRATEGY
      INTEGER(8), INTENT(in) :: SIZER_NEEDED
      LOGICAL, INTENT(in)    :: SKIP_TOP_STACK
      INTEGER, INTENT(in)  :: N, SLAVEF, KEEP(500)
      INTEGER, INTENT(in)  :: MYID
      INTEGER(8), INTENT(inout) :: KEEP8(150)
      INTEGER :: IWPOS, IWPOSCB, LIW
      INTEGER, INTENT(inout) :: IW( LIW )
      INTEGER(8) :: LA, LRLU, IPTRLU, LRLUS
      DOUBLE PRECISION, INTENT(in) :: A( LA )
      INTEGER, INTENT(in)    :: STEP(N)
      INTEGER(8), INTENT(inout) :: PTRAST(KEEP(28)), PAMASTER(KEEP(28))
      INTEGER, INTENT(in)    :: PROCNODE_STEPS(KEEP(28)), DAD(KEEP(28))
      INTEGER, INTENT(inout) :: IFLAG, IERROR
      CALL dmumps_dm_cbstatic2dynamic( strategy,
     &           sizer_needed, skip_top_stack,
     &           myid, n, slavef,
     &           keep, keep8,
     &           iw, liw, iwposcb, iwpos,
     &           a, la, lrlu, iptrlu, lrlus, 
     &           step, ptrast, pamaster,
     &           procnode_steps, dad, iflag, ierror)
      RETURN

dmumps_dm_freealldynamiccb_i()

subroutine dmumps_dm_freealldynamiccb_i	(	integer, intent(in)	myid,
		integer, intent(in)	n,
		integer, intent(in)	slavef,
		integer, dimension(500), intent(in)	keep,
		integer(8), dimension(150), intent(inout)	keep8,
		integer, dimension( liw ), intent(inout)	iw,
		integer	liw,
		integer	iwposcb,
		integer	iwpos,
		integer, dimension(n), intent(in)	step,
		integer(8), dimension(keep(28)), intent(in)	ptrast,
		integer(8), dimension(keep(28)), intent(in)	pamaster,
		integer, dimension(keep(28)), intent(in)	procnode_steps,
		integer, dimension(keep(28)), intent(in)	dad,
		logical, intent(in)	atomic_updates )

Definition at line 453 of file dfac_mem_dynamic.F.

      USE dmumps_dynamic_memory_m, ONLY : dmumps_dm_freealldynamiccb
      IMPLICIT NONE
      INTEGER, INTENT(in)  :: N, SLAVEF, KEEP(500)
      INTEGER, INTENT(in)  :: MYID
      INTEGER(8), INTENT(inout) :: KEEP8(150)  
      INTEGER :: IWPOS, IWPOSCB, LIW
      INTEGER, INTENT(inout) :: IW( LIW ) 
      INTEGER, INTENT(in)    :: STEP(N)
      INTEGER(8), INTENT(in) :: PTRAST(KEEP(28)), PAMASTER(KEEP(28))
      INTEGER, INTENT(in)    :: PROCNODE_STEPS(KEEP(28)), DAD(KEEP(28))
      LOGICAL, INTENT(in)    :: ATOMIC_UPDATES
      CALL       dmumps_dm_freealldynamiccb( myid, n, slavef,
     &           keep, keep8, iw, liw, iwposcb, iwpos,
     &           step, ptrast, pamaster,
     &           procnode_steps, dad, atomic_updates )
      RETURN