bigspoon
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Можно ли на компиляторе g95 сделать параллелельное вычмсление? Если, нет, то подскажите, пожалуста, как можно распараллелить, например, вот такой код: !integer COUNT ICOUNT = 0 do i1=0,9 do i2=0,9 do i3=0,9 do i4=0,9 do i5=0,9 do i6=0,9 if (i1+i2+i3 .EQ. i4+i5+i6) then ICOUNT=ICOUNT+1 print*, 'COUNT=', ICOUNT, ' ',i1, i2, i3,' ', i4, i5, i6 endif endDO endDO endDO endDO endDO endDO print*, 'COUNT=', ICOUNT end |