- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
My name is Derrick Fitton and I have written a Visual Fortran Program that uses the f90gl libraries to display a graphical representaion of an undeformed and deformed frame using the data created by the visual fortran program. The following is a copy of my VF main program. Do you know why I am getting the error that I am. Any help you could give me would be most appreciated. Thank You
Derrick Fitton
The error began happening when I inputted the 3fvertex function call into my main program.
use opengl_gl
implicit double precision(a-h,o-z)
dimension asat(1200,1200),p(1200),x(1200),index(1200)
dimension id(300,6),xo(1200),po(1200)
dimension xcd(300),ycd(300),zcd(300),ndof(300,6)
dimension npe(12),ea(12,6),f(6)
dimension eao(12,6),esato(6,12)
common ewo,xnso,udo,e,g,a,xi1,xi2,xj,xlo,gdo,eao,esato
common cosa,cosb,cosc,sinc,cosphi,sinphi
open(unit=10,file='oldgeo.dat',status='unknown')
open(unit=11,file='member.dat',status='unknown')
open(unit=12,file='output.dat',status='unknown')
&! nbsp; &sp; tol=0.05
axf=0.
&n! bsp; read(11,*) nm
write(*,*) ' No. of members in structure =',nm
write(12,'(a)') ' Member Data '
write(12,'(a)') ' Member Initial Joint Terminal Joint'
do 210 k=1,nm
read(11,*) memno,npi,npj,e,pr
call glbegin(GL_LINE)
call 3fvertex(xcd(npi),ycd(npi),zcd(npi))
call 3fvertex(xcd(npj),ycd(npj),zcd(npj))
call glend
But I'm still getting the error message:
Compiling...
Error spawning cl.exe
Derrick Fitton
The error began happening when I inputted the 3fvertex function call into my main program.
use opengl_gl
implicit double precision(a-h,o-z)
dimension asat(1200,1200),p(1200),x(1200),index(1200)
dimension id(300,6),xo(1200),po(1200)
dimension xcd(300),ycd(300),zcd(300),ndof(300,6)
dimension npe(12),ea(12,6),f(6)
dimension eao(12,6),esato(6,12)
common ewo,xnso,udo,e,g,a,xi1,xi2,xj,xlo,gdo,eao,esato
common cosa,cosb,cosc,sinc,cosphi,sinphi
open(unit=10,file='oldgeo.dat',status='unknown')
open(unit=11,file='member.dat',status='unknown')
open(unit=12,file='output.dat',status='unknown')
&! nbsp; &sp; tol=0.05
axf=0.
&n! bsp; read(11,*) nm
write(*,*) ' No. of members in structure =',nm
write(12,'(a)') ' Member Data '
write(12,'(a)') ' Member Initial Joint Terminal Joint'
do 210 k=1,nm
read(11,*) memno,npi,npj,e,pr
call glbegin(GL_LINE)
call 3fvertex(xcd(npi),ycd(npi),zcd(npi))
call 3fvertex(xcd(npj),ycd(npj),zcd(npj))
call glend
But I'm still getting the error message:
Compiling...
Error spawning cl.exe
Link Copied
1 Reply
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
The error you're getting has nothing to do with your Fortran source. It indicates that you added a .c or .cpp file to your project and don't have Microsoft Visual C/C++ installed.
Steve
Steve
![](/skins/images/C4F7392A5C68ACA60290C9576F107044/responsive_peak/images/icon_anonymous_message.png)
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page