OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
zfac_mem_dynamic.F File Reference

Go to the source code of this file.

Modules

module  zmumps_dynamic_memory_m

Functions/Subroutines

subroutine zmumps_dynamic_memory_m::zmumps_dm_set_dynptr (cb_state, a, la, pamaster_or_ptrast, ixxd, ixxr, son_a, iachk, recsize)
subroutine zmumps_dynamic_memory_m::zmumps_dm_pamasterorptrast (n, slavef, myid, keep28, keep199, inode, cb_state, ixxd, step, dad, procnode_steps, rcurrent, pamaster, ptrast, is_pamaster, is_ptrast)
logical function zmumps_dynamic_memory_m::zmumps_dm_isband (xxstate)
logical function zmumps_dynamic_memory_m::zmumps_dm_is_dynamic (ixxd)
subroutine zmumps_dynamic_memory_m::zmumps_dm_fac_alloc_allowed (mem_count_to_allocate, keep8, iflag, ierror)
subroutine zmumps_dynamic_memory_m::zmumps_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 zmumps_dynamic_memory_m::zmumps_dm_freealldynamiccb (myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, step, ptrast, pamaster, procnode_steps, dad, atomic_updates)
subroutine zmumps_dynamic_memory_m::zmumps_dm_set_ptr (address, sizfr8, cbptr)
subroutine zmumps_dynamic_memory_m::zmumps_dm_free_block (xxg_status, dynptr, sizfr8, atomic_updates, keep8)
subroutine zmumps_dm_freealldynamiccb_i (myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, step, ptrast, pamaster, procnode_steps, dad, atomic_updates)
subroutine zmumps_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

◆ zmumps_dm_cbstatic2dynamic_i()

subroutine zmumps_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,
complex(kind=8), 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 zfac_mem_dynamic.F.

484 IMPLICIT NONE
485 INTEGER, INTENT(in) :: STRATEGY
486 INTEGER(8), INTENT(in) :: SIZER_NEEDED
487 LOGICAL, INTENT(in) :: SKIP_TOP_STACK
488 INTEGER, INTENT(in) :: N, SLAVEF, KEEP(500)
489 INTEGER, INTENT(in) :: MYID
490 INTEGER(8), INTENT(inout) :: KEEP8(150)
491 INTEGER :: IWPOS, IWPOSCB, LIW
492 INTEGER, INTENT(inout) :: IW( LIW )
493 INTEGER(8) :: LA, LRLU, IPTRLU, LRLUS
494 COMPLEX(kind=8), INTENT(in) :: A( LA )
495 INTEGER, INTENT(in) :: STEP(N)
496 INTEGER(8), INTENT(inout) :: PTRAST(KEEP(28)), PAMASTER(KEEP(28))
497 INTEGER, INTENT(in) :: PROCNODE_STEPS(KEEP(28)), DAD(KEEP(28))
498 INTEGER, INTENT(inout) :: IFLAG, IERROR
499 CALL zmumps_dm_cbstatic2dynamic( strategy,
500 & sizer_needed, skip_top_stack,
501 & myid, n, slavef,
502 & keep, keep8,
503 & iw, liw, iwposcb, iwpos,
504 & a, la, lrlu, iptrlu, lrlus,
505 & step, ptrast, pamaster,
506 & procnode_steps, dad, iflag, ierror)
507 RETURN
subroutine zmumps_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)

◆ zmumps_dm_freealldynamiccb_i()

subroutine zmumps_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 zfac_mem_dynamic.F.

458 IMPLICIT NONE
459 INTEGER, INTENT(in) :: N, SLAVEF, KEEP(500)
460 INTEGER, INTENT(in) :: MYID
461 INTEGER(8), INTENT(inout) :: KEEP8(150)
462 INTEGER :: IWPOS, IWPOSCB, LIW
463 INTEGER, INTENT(inout) :: IW( LIW )
464 INTEGER, INTENT(in) :: STEP(N)
465 INTEGER(8), INTENT(in) :: PTRAST(KEEP(28)), PAMASTER(KEEP(28))
466 INTEGER, INTENT(in) :: PROCNODE_STEPS(KEEP(28)), DAD(KEEP(28))
467 LOGICAL, INTENT(in) :: ATOMIC_UPDATES
468 CALL zmumps_dm_freealldynamiccb( myid, n, slavef,
469 & keep, keep8, iw, liw, iwposcb, iwpos,
470 & step, ptrast, pamaster,
471 & procnode_steps, dad, atomic_updates )
472 RETURN
subroutine zmumps_dm_freealldynamiccb(myid, n, slavef, keep, keep8, iw, liw, iwposcb, iwpos, step, ptrast, pamaster, procnode_steps, dad, atomic_updates)