trans1.inc

shpf 1.9一个并行编译器

        PARAMETER (MAXD=100)
        PARAMETER (SIDE=2)
        PARAMETER (LOOPS=100)

! The problem is defined as a MAXDxMAXD matrix; 
!
! The number of processors is defined as a SIDExSIDE mesh;
!
! LOOPS = number of iterations.