Commit 30e3b721 authored by Miguel Tremblay's avatar Miguel Tremblay
Browse files

Remove debugging lines.

parent e5cade12
......@@ -53,8 +53,6 @@
INTEGER nppOutput(0:nLine-1,0:nColumn-1)
INTEGER i,j
WRITE(*,*) "asdf"
DO j=0, nColumn-1
DO i=0, nLine-1
nppOutput(i,j) = npInput(i*nColumn + j)
......
......@@ -417,6 +417,15 @@
* -----------------------------------------------------------
ETAT = 3
end if
* WRITE(*,*) ETAT
* WRITE(*,*) "PRG", PRG
* WRITE(*,*) "ER1", ER1
* WRITE(*,*) "FV1", FV1
* WRITE(*,*) "PR1", PR1
* WRITE(*,*) "ER2", ER2
* WRITE(*,*) "FV2", FV2
* WRITE(*,*) "PR2", PR2
return
end
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment