Nonsense error in FORTRAN


 
Thread Tools Search this Thread
Top Forums UNIX for Beginners Questions & Answers Nonsense error in FORTRAN
# 1  
Old 04-20-2020
Nonsense error in FORTRAN

Hello, I've been trying to set up a code for fortran, it's about integration, the problem comes when I try to compile the program, the log shows 2 errors: "Error: Expected a right parenthesis in expression " 2 times, and only in 1 shows the line in which it's apparently located (32), I'm going crazy cause i can't find the problem, does anyone know what's wrong?, the code is:

Code:
program main
  implicit none
  integer :: n,i,k
  real*8 :: a,b,x,trapecio,s,suma1,suma2,x2,formula1,formula2,eps,div,h

  !variables
  n=3
  a=0d8
  b=4d8


  !calculate the additions 1 a n-1 y 2 a n-2

  suma1=0d0
  suma2=0d0
  do n=3,300,2*n
   h=(b-a)/dble(n)

        do i=1,n-1,2
            x=a+dble(i)*h
            formula1= 1/(1+(x^2))
            suma1=  suma1 + formula1
        end do

        do k= 2,n-2,2
            x2=a+dble(k)*h
            formula2 =1/(1 + (x2^2)
            suma2= suma2+ formula2
        end do

     trapecio= h/3* &
     (1+ 4*suma1 + 2*suma2 + 1(1/n^2))
     div= trapecio/(trapecio/2)
            if (div < 1d-6) then
                exit
            end if

    write(*,*), trapecio
   end do
  end

# 2  
Old 04-20-2020
Show the compilation command including all error messages. One error is here:

Code:
            formula2 =1/(1 + (x2^2)

For the rest the messages might help.
This User Gave Thanks to RudiC For This Post:
# 3  
Old 04-20-2020
I've corrected the error you indicated before and now still appearing the same errors but doesn't show the line, the build log is:

Code:
-------------- Build: Debug in examen ejercicio2 (compiler: GNU Fortran Compiler)---------------

mingw32-gfortran.exe -Jobj\Debug\ -Wall  -g     -c "D:\Users\Luis Carlos Dorado\Desktop\examen ejercicio2\main.f95" -o obj\Debug\main.o
mingw32-gfortran.exe  -o "bin\Debug\examen ejercicio2.exe" obj\Debug\main.o   
D:\Users\Luis Carlos Dorado\Desktop\examen ejercicio2\main.f95:21:29: Error: Expected a right parenthesis in expression at (1)
D:\Users\Luis Carlos Dorado\Desktop\examen ejercicio2\main.f95:27:32: Error: Expected a right parenthesis in expression at (1)
  D:\Users\Luis Carlos Dorado\Desktop\examen ejercicio2\main.f95:32:31: Error: Expected a right parenthesis in expression at (1)


EDIT: I messed up with the exponentials so hard, thank you so much for your help sir!

Last edited by AkaAlteir; 04-20-2020 at 06:04 PM..
# 4  
Old 04-20-2020
My FORTRAN days are looooooong gone, but two of the three "error coordinates" indicate the complier might not be happy with the ^ for exponentiation. I faintly remember it being ** in those old days. Sure you got no syntax gobbledigook?
This User Gave Thanks to RudiC For This Post:
# 5  
Old 04-20-2020
Code:
(1+ 4*suma1 + 2*suma2 + 1(1/n^2))

Should there be an operator between 1 and (1/n^2)
This User Gave Thanks to jgt For This Post:
# 6  
Old 04-20-2020
Quote:
I faintly remember it being ** in those old days
You remember it well hahaha I messed up with the exponentials. I know it's an old language that's barely used but in my University they make me use it in first grade.


Quote:
Should there be an operator between 1 and (1/n^2)
And yes, I corrected that too

Thank you so much for your help, finally it compiled Smilie
Login or Register to Ask a Question

Previous Thread | Next Thread

4 More Discussions You Might Find Interesting

1. Programming

Error in my FORTRAN program

I have a Fortran program and I am writing out to logical unit 7. The program is reading from a text file and writing to the new file formatted. It gets through the read and writes some to the file but then stops with the following error: 1525-013 The sequential WRITE statement cannot be... (5 Replies)
Discussion started by: KathyB148
5 Replies

2. Homework & Coursework Questions

FORTRAN error *** glibc detected ***

Use and complete the template provided. The entire template must be completed. If you don't, your post may be deleted! 1. The problem statement, all variables and given/known data: I'm doing aproximation of derivative called five-point stencil. For every value of x, in interval , in step... (0 Replies)
Discussion started by: antonija
0 Replies

3. Programming

Fortran runtime error: Insufficient data descriptors in format after reversion

Hello, I have some Fortran code that is providing the following error: At line 1165 of lapc_shells_2.f Fortran runtime error: Insufficient data descriptors in format after reversion Here are the lines just above and including 1165: WRITE (*,"('ATTEMPTING TO READ PLATE... (1 Reply)
Discussion started by: jm4smtddd
1 Replies

4. Programming

Error running FORTRAN code

Hi, I am new to this forum and do not know whether this is the appropriate place to post this question. Anyway am trying my luck. I have a fortran program swanhcat.ftn, which is part of a wave modelling system. There is also a file hcat.nml which is required to run this program. The program's... (9 Replies)
Discussion started by: sandhyakg
9 Replies
Login or Register to Ask a Question