Question: For the given Fortran Code integer nh,istrt,isw, ii real8 td real8 eps(),theta(),d(),ud(),hn(nh),h1(nh), sig(),dd(6,) real8 eeps(3,3), deeps(3,3),veeps(3,3),betan(3,3),beta(3,3) real8 eepsn(3,3),betam(6),eepsm(6),esig(3,3) real8 edd(3,3,3,3) integer i,j,k,l,imap(6),jmap(6),xis(3,3) real8 xi(6), xii(6,6),

For the given Fortran Code

integer nh,istrt,isw, ii real*8 td real*8 eps(*),theta(*),d(*),ud(*),hn(nh),h1(nh), sig(*),dd(6,*) real*8 eeps(3,3), deeps(3,3),veeps(3,3),betan(3,3),beta(3,3) real*8 eepsn(3,3),betam(6),eepsm(6),esig(3,3) real*8 edd(3,3,3,3) integer i,j,k,l,imap(6),jmap(6),xis(3,3) real*8 xi(6), xii(6,6), xpp(6,6), third, twothird,xid(3,3) real*8 xidxid(3,3,3,3),xppxpp(3,3,3,3) real*8 xkappa, xmu0, xmu1, eta1 real*8 e, dev(6), fac1, fac2, epst(3,3),a .

(There is some code between but I only used edd(3,3,3,3) here in the part given below) do i=1,3 do j=1,3 do k=1,3 do l=1,3 edd(i,j,k,l)=xkappa*xidxid(i,j,k,l)+ & 2xmu0*xppxpp(i,j,k,l)+fac2*xppxpp(i,j,k,l) enddo enddo enddo enddo 252 | edd(i,j,k,l)=xkappa*xidxid(i,j,k,l)+ | 1 Error: Unclassifiable statement at (1) make: *** [makefile:23: linve_A.o] Error 1

I am getting this error constantly. There is no line between the code that involves edd(3,3,3,3) parameter, so I didn't include it. I tried to define edd in all the lines. Wwhat might be the problem here?

Step by Step Solution

There are 3 Steps involved in it

1 Expert Approved Answer

Step: 1 Unlock blur-text-image

Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock

Step: 3 Unlock

Students Have Also Explored These Related Databases Questions!

There are many algorithms that can be used to encrypt a message. One of these algorithms can be described as follows: Choose a "code word. For example, "fortran. Assign integer values to each of the...

Program 1 = Fortran Due in two weeks, Friday February 5th at 7pm You are support staff for a Super Spy. You will need to write a program that will tell your Super Spy boss which locker the stolen...

a working fortran code is required. it should a fortran code file with .F95 this is all the information the first code is wrong. we have to correct it to make it a running code. Given below is a 2D...

Tic-Tac-Toe In Fortran 90 For this assignment, you will be creating an interactive Tic-Tac-Toe game for two players. There are 2 parts to this assignment. In the first part, you are going to be given...

please send it in good quality so that i can read it i am sending this second time because i couldnt read the answer in first one write a code in fortrun software ( that works in fortrun and also...

fortran code pls help.! Purpose: The purpose of this assignment is to code Simpson's Rule as a Fortran code and to gain some experience with carrying out convergence tests Your goal: Write a Fortran...

Fortran code: The data collected from one run of this rig is given in the file HW05_02_SpringData.txt, which is available on CatCourses. Look over that file to see how the headers are set up and note...

Number 3 and 4 in Fortran code. Write a Fortran program that defines two one-dimensional arrays, each with 20 real elements. Use the array constructor notation we discussed in lecture to initialize...

(a) Identify the outcomes (be printed) of the below FORTRAN code segments: Code Snippet 1 PROGRAM test 1 IMPLICIT NONE LOGICAL :: x= TRUE., y = FALSE., z z = (x .AND. y) OR. (x EQV. y) PRINT *, Z END...

Fortran has a three-way IF statement of the form IF (expression) n1, n2, n3 where expression is a numeric expression and n1, n2, n3 are statement numbers. Control transfers to statement n1 if...

Show that the rectangular solid of maximum volume that can be inscribed in a sphere is a cube.

Design a cast iron trunk type piston for a single acting four stroke engine developing 75 kW per cylinder when running at 600 r.p.m. The other avialable data is as follows: Maximum gas pressure = 4.8...

3.9 Best-Performing Cars In 2013, 66 international motoring journalists selected the 10 best-performing cars of the previous 12 months. The brake horsepowers of the top five cars were 730, 565, 571,...

last two options for the multiple choice are : performance management development A construction equipment manufacturer, Roswell Corporation, is focusing on becoming a leader in sustainability in...

Recruitment. With an emphasis on specialized skills and the possibilities of enhancing qualifications within the company through further training, recruitment is often first through internal sourcing...

An emphasis on Technik as both means and ends. The importance of engineering knowledge and craft skills that go into production is evidenced by the high standing of engineers in society and in...

Reward systems. Wage levels are complex and involve issues of wage fairness with principles laid down in collective wage agreements, labourmanagement agreements and individual contracts of...