tmpl-1

shpf 1.9一个并行编译器

  INCLUDE  "procs.inc"       ! for processors 'procs'

!HPF$ TEMPLATE :: tmplc (n+1, n+1)
!HPF$ TEMPLATE :: tmplf (2*n+1, 2*n+1)

!HPF$ DISTRIBUTE  (*, BLOCK)  ONTO  procs :: tmplc, tmplf