FDVM_DD (1158349), страница 5

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 5)

* creating distributed array

dvm000(i+1) = crtda(dvm000(j),i0000m,n,...)

. . .

* aligning distributed array

dvm000(i+2) = align(dvm000(j),dvm000(iamv),n,...)

* copying distributed arrays

dvm000(i+3) = arrcpy(array-header,...,dvm000(j),...)

4.4 Input/Output (io.cpp module)

In DVM model, input, output and other operations with external files are executed by single processor ( I/O processor ), which is determined by run-time system. I/O of a replicated variable deals with variable copy allocated on I/O processor. I/O of a distributed array deals with buffer array allocated on I/O processor. Inputted data are sent to all other processors owing the variables of input list. When the distributed array is outputted, data are transferred into the buffer from other processors owing elements of the array.

The function analyzes input/output item list. If there are not any distributed array references in the list, this function returns 1, else it returns 0.

Calls ImplicitLoopTest( ) , IoitemTest( ).

The function analyzes item list of implicit loop. If there are not any distributed array references in the list, this function returns 1, else it returns 0.

If the I/O item is not a distributed array reference this function returns 1, else it returns 0.

The function analyzes the control information list of the data transfer statement and assigns the value of control parameters (UNIT,FMT,ERR, and so on) to the elements of array ioc[]. If there are some syntax errors it returns 0, else 1.

The function analyzes the control information list of the BACKSPACE, REWIND and ENDFILE statement and assigns the value of control parameters (UNIT,ERR, and so on) to the elements of array ioc[]. If there are some syntax errors it returns 0, else 1.

The function analyzes the control information list of the OPEN, CLOSE and INQUIRE statement and assigns the value of control parameters (UNIT,ERR, and so on) to the elements of array ioc[]. If there are some syntax errors it returns 0, else 1.

In case of I/O of distributed array the memory is allocated in user program for buffer I/O.

Let A(N₁,N₂,...,N_k) is distributed array of rank k, BUF(L) - vector of the same type as array A (named i000io if A is of type integer, or r000io - if A is of type real,...).

The function replaces a statement I/O of A with the sequence of statements according to the following scheme:

s₀ = L

s_i = [s_i-1 / N_i] i  {1 : k}

n = max(i)

s_i 0, i{0 : k}

m = 1 (if n = k)

}

DO label I_n+2 = 0, N_n+2-1

. . . n+2  k

DO label I_k = 0, N_k-1

}

DO label I_n+1 = 0, N_n+1-1, s_n

if (I_n+1 .LE. N_n+1) then

m = s_n n+1  k

else

m = N_n+1 - I_n+1

endif

input:

IF(tstio( ) .eq. 0 ) READ (...) (BUF(j), j = 1, N₁ * ...*N_n * m)

copying-arrray-section (BUF(1 : N₁ * ...*N_l* m),

A(1: N₁,...,1:N_n , I_n+1 +1: I_n+1 +m , I_n+2 +1, ..., I_k +1) )

output:

copying-arrray-section (BUF(1 : N₁ * ...*N_l* m),

n  1

A(1: N₁,...,1:N_n , I_n+1 +1: I_n+1 +m , I_n+2 +1, ..., I_k +1) )

IF(tstio( ) .eq. 0 ) WRITE (...) (BUF(j), j = 1, N₁ * ...*N_n * m)

label CONTINUE

(An operation of copying-arrray-section is implemented by function arrcpy( ).)

4.5 Inserting new statements in parse tree (stmt.cpp module)

The statement stat is inserted in the parse tree (program) after statement current and its control parent is cp.

The statement stat is inserted in the parse tree (program) before statement current.

Creates the assign statement with right part re :

dvm000(i) = re

and inserts it before the statement where (global variable).

Creates the assign statement with right part re :

dvm000(i) = re

and inserts it before the statement where (global variable). The function returns left part of this statement.

Creates the assign statement:

Характеристики

Список файлов учебной работы