Parent Directory | Revision Log | Revision Graph | Patch
revision 1.3 by cnh, Sun Feb 4 14:38:51 2001 UTC | revision 1.4 by heimbach, Tue Apr 10 22:35:27 2001 UTC | |
---|---|---|
# | Line 63 C o Apply amplitude filter and norma | Line 63 C o Apply amplitude filter and norma |
63 | phi(i)=phi(i)*ampFactorV(i,j,bi,bj)/float(Nx) | phi(i)=phi(i)*ampFactorV(i,j,bi,bj)/float(Nx) |
64 | ENDDO | ENDDO |
65 | ELSE | ELSE |
66 | WRITE(0,*) 'Error: gridLoc = ',gridLoc | WRITE(*,*) 'Error: gridLoc = ',gridLoc |
67 | STOP 'Error: gridLoc has illegal value' | STOP 'Error: gridLoc has illegal value' |
68 | ENDIF | ENDIF |
69 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |