QUOTE(hamedpar @ 9 Jun, 2009 - 07:28 AM)
program iso
implicit none
real , dimension(1000) :: St01,St02
integer :: k
real ::X1,X2
X1=0.05 (variable & Changeable)
X2=0.1 (variable & Changeable)
open(1,file='D:\X1\ST01_drift.txt')
open(2,file='D:\X2\ST02_drift.txt')
Do k = 1,1000
read(1,*) st01(k)
end do
Do k = 1,1000
read(2,*) st02(k)
end do
end program iso
X1 and X2 are variables & Changeable and should be defined as.
the problem is that their amount used in the address and it makes errors.
please help me to run this fortran correctly.thanks
I had a problem on my program
this is my program:
program iso
implicit none
real , dimension(1000) :: St01,St02
integer :: k
X1=0.05 (variable & Changeable)
X2=0.1 (variable & Changeable)
open(1,file='D:\X1\ST01_drift.txt')
open(2,file='D:\X2\ST02_drift.txt')
Do k = 1,1000
read(1,*) st01(k)
end do
Do k = 1,1000
read(2,*) st02(k)
end do
end program iso
the problem is that my program can not read ST01_drift.txt and ST02_drift.txt form folders with name 0.05 and 0.1
in other words, folders 0.05 and 0.1 contains ST01_drift.txt and ST02_drift.txt
and in "open" comment, folders 0.05 and 0.1 should be opened with variables X1 and X2.
I don't know what kind of Variable X1 and X2 must be defined.for example REAL or CHARACTER or other things like these.
Sincerely yours
Forum Index:
Programming Help |
C and C++ |
VB6 |
Java |
VB.NET |
C# |
ASP.NET |
PHP |
ColdFusion |
Perl and Python |
Ruby |
Databases |
Other Languages |
Game Programming |
Mobile Development |
Software Development |
Computer Science |
Industry News |
Programming Tutorials |
C++ Tutorials |
Visual Basic Tutorials |
Java Tutorials |
VB.NET Tutorials |
C# Tutorials |
Linux Tutorials |
PHP Tutorials |
ColdFusion Tutorials |
Windows Tutorials |
HTML/JavaScript Tutorials |
CSS Tutorials |
Flash Tutorials |
Web Promotion Tutorials |
Graphic Design & Photoshop Tutorials |
Software Development Tutorials |
Database Tutorials |
Other Language Tutorials |
ASP.NET Tutorials |
Game Programming Tutorials |
WPF & Silverlight Tutorials |
| 
