gfortran - Fortran on Code Blocks_Linux Mint -


i start using code blocks programing in fortan. created console app, compiling gnu fortran compiler , when start compiling got mesage:

/media/aleksandar/hd_2/programiranje/code blocks/fortran/aleksandar/main.f95|15|/media/aleksandar/hd_2/programiranje/code blocks/fortran/aleksandar/main.f95 15 .1:|
||warning: nonconforming tab character |
/media/aleksandar/hd_2/programiranje/code blocks/fortran/aleksandar/main.f95|15|/media/aleksandar/hd_2/programiranje/code blocks/fortran/aleksandar/main.f95 15 .25:|
||error: unexpected end of format string in format string |
||=== build failed: 1 error(s), 7 warning(s) (0 minute(s), 0 second(s)) ===|

what problem code?

this code:

program kto !program za sortiranje niza (rastuce opadajuce vrijednosti) implicit none integer::i,n,odabir real,dimension(24)::ppot logical::max !otvaranje datoteke sa podacima o potrosnji !kad se ucitava kolona na ovaj nacin uvijek ide n+1 broj ucitavanja !strogo paziti na ovo open(8,file='ulaz',status='old')         read(8,'(i3,/,25(f5.1,/)')n,(ppot(i),i=1,n)   close(8) write(*,'(2x,"kakvo sortiranje zelite?",//,& 2x,"1 - opadajuce vrijednosti?",/,& 2x,"2 - rastuce vrijednost?")') read(*,'(i2)') odabir if (odabir.eq.1)    max=.true. else    max=.false. end if call sort(n,ppot,max)  ! ispis podataka u datoteku open(10,file='izlaz',status='unknown')     write(10,'(1x,14hsortirani niz:,24(/,f5.1))') (ppot(i),i=1,n) close(10) stop end program kto !potprogram za sortiranje subroutine sort(n,ppot,max) implicit none integer::i,j integer,intent(in)::n real,dimension(n),intent(inout)::ppot logical,intent(in)::max real::pom if (max.eqv..true.)    i=1,n-1        j=i+1,n           if (ppot(i).lt.ppot(j))               pom=ppot(i)               ppot(i)=ppot(j)               ppot(j)=pom           end if        end    end else    i=1,n-1       j=i+1,n          if (ppot(i).gt.ppot(j))               pom=ppot(i)               ppot(i)=ppot(j)               ppot(j)=pom          end if       end    end  end if return end subroutine sort

i have compiled code gfortran4.7.2. @albert suggested, following line turned out error:

read(8,'(i3,/,25(f5.1,/)')n,(ppot(i),i=1,n)

if fixed to

read(8,'(i3,/,25(f5.1,/))')n,(ppot(i),i=1,n)                         ^--- added

or

read(8,'(i3,/,25(f5.1),/)')n,(ppot(i),i=1,n)                      ^--- added

the code started run, aborted because have no file "ulaz".


Comments

Post a Comment

Popular posts from this blog

node.js - Using Node without global install -

i'm working on few node & electron (atom shell) projects , i'm curious how them work without user having install node globally. i've seen few applications including node directory in project contains node.exe binary. how go setting node project use binary? edit: thought should add, i've searched everywhere answer this, unrelated results.
Read more

How to access a php class file from PHPFox framework into javascript code written in simple HTML file? -

i've website developed using phpfox v3.0.7 . now i'm trying implement 'sse(server sent events)' 1 of php files. reference i'm giving below necessary code part of file. file titled process.class.php , present @ location /var/www/module/notification/include/service/process.class.php present on server having ip http://34.124.40.142/ . <?php /** * [phpfox_header] */ header('content-type: text/event-stream'); header('cache-control: no-cache'); defined('phpfox') or exit('no dice!'); /** * * * @copyright [phpfox_copyright] * @author raymond benc * @package phpfox_service * @version $id: service.class.php 67 2009-01-20 11:32:45z raymond_benc $ */ class notification_service_process extends phpfox_service { /** * class constructor */ public function __construct() { $this->_stable = phpfox::gett('notification'); } public function add($...
Read more

java - Null response to php query in android, even though php works properly -

Image
table i'm trying retrieve above data using 2 php files below. want pass email parameter , return bets user = email. work fine when tested advanced rest client, problem not php. however, when try through android 2 java classes below, null pointer exception (logcat below) , json object returned null. i'm not sure error is, think i'm not passing parameter php , that's why it's producing null response. logcat 05-31 15:10:50.227 26074-26074/com.example.albert.betterapp e/androidruntime﹕ fatal exception: main process: com.example.albert.betterapp, pid: 26074 java.lang.runtimeexception: unable start activity componentinfo{com.example.albert.betterapp/com.example.albert.betterapp.displayallbets}: java.lang.nullpointerexception @ android.app.activitythread.performlaunchactivity(activitythread.java:2292) @ android.app.activitythread.handlelaunchactivity(activitythread.java:2350) @ android.app.activitythread.acce...
Read more