xerbla_array function

void xerbla_array(
  1. List<int> SRNAME_ARRAY,
  2. int SRNAME_LEN,
  3. int INFO
)

Implementation

void xerbla_array(
  final List<int> SRNAME_ARRAY,
  final int SRNAME_LEN,
  final int INFO,
) {
  var SRNAME = ' ';
  for (var I = 1; I <= min(SRNAME_LEN, SRNAME.length); I++) {
    SRNAME += String.fromCharCode(SRNAME_ARRAY[I]);
  }

  xerbla(SRNAME, INFO);
}