modified: io_config.F90
authorAgnieszka Lipska <lypstyk@gmail.com>
Wed, 13 Nov 2019 11:56:54 +0000 (12:56 +0100)
committerAgnieszka Lipska <lypstyk@gmail.com>
Wed, 13 Nov 2019 11:56:54 +0000 (12:56 +0100)
source/unres/io_config.F90

index 345ec71..a66638b 100644 (file)
        epscat(i,j),sigmacat(i,j),chicat(i,j),chicat(j,i),chippcat(i,j),chippcat(j,i), &
        (alphasurcat(k,i,j),k=1,4),sigmap1cat(i,j),sigmap2cat(i,j),&
        chiscat(i,j),chiscat(j,i), &
+       nstatecat(i,j),(wstatecat(k,i,j),k=1,4), &                           !5 w tej lini - 1 integer pierwszy
        dheadcat(1,1,i,j),dheadcat(1,2,i,j),dheadcat(2,1,i,j),dheadcat(2,2,i,j),&
        dtailcat(1,i,j),dtailcat(2,i,j), &
        epsheadcat(i,j),sig0headcat(i,j), &