inversion_SPAC Subroutine

public subroutine inversion_SPAC(this, db, db_shape, frequency_scope, name)

$OMP parallel do default(shared) private(buf,line,f,chk,trial_value,id,my_filepath,proc_id) $OMP end parallel do

Type Bound

SPAC_

Arguments

Type IntentOptional Attributes Name
class(SPAC_), intent(inout) :: this
character(len=*), intent(in) :: db
integer(kind=int32), intent(in) :: db_shape(1:2)
real(kind=real64), intent(in) :: frequency_scope(1:2)
character(len=*), intent(in) :: name