Fortran compilation error - undefined reference -


i trying compile fortran program uses bunch of modules. obtain error when compile it, , it's driving me crazy. error originated addition of 1 subroutine , takes place when try recompile program:

main program contains these 2 lines:

--

call read_step(nstepone,molone) call read_step(nstep,mol)

--

this calling 1 of subroutines in file "fileio.f90":

--

subroutine read_step(n,tape)  implicit none  integer, intent(in) :: tape integer, intent(out) :: n  character(len=6) :: dum  rewind(tape) read (tape,*) read (tape,*) dum, n rewind(tape) return ! end subroutine read_step

--

when try compile it, following error arises:

ifort -o spidmd.x *.o -static-intel -openmp  spidmd.o: in function `main__': spidmd.f90:(.text+0x3b2): undefined reference `read_step_' spidmd.f90:(.text+0x3c5): undefined reference `read_step_' make: *** [spidmd.x] error 1

other calls subroutines in same module did not give error, , don't see difference between calls "old subroutines" , 1 created.

an example of 1 of these "old subroutines", not give complaint, is:

in main program:

call get_dim(n_atom,nsnap,mol)

in fileio.f90:

subroutine get_dim(n,n_snap,tape)  implicit none  integer,intent(in) :: tape integer,intent(out) :: n, n_snap integer :: m  rewind(tape) read (tape,*,err=1,end=2) n rewind(tape)  m = 0 while (.true.)    read (tape,*,err=1,end=3)    m = m +1 end 3   n_snap = m/(n + 2) if (m.ne.(n_snap*(n + 2))) stop  'unexpected end of input file'  rewind(tape)  return ! 1   stop 'error in input file' 2   stop 'unexpected end of input file' end subroutine get_dim

i have absolutely no idea why behavior. i'd grateful if me solve nightmare. thanks!

if definition of subroutine read_step in module, have either forgotten add use statement module top of main program, or relevant procedures in module not public.

with compiler (and others) linker names module procedures consist of module name followed 'mp' (case may vary) followed procedure name, various amounts of leading , trailing underscores salted taste. linker error doesn't have of "mangling", indicates when compiling scope procedure reference, compiler doesn't think procedure module procedure.


Comments

Post a Comment

Popular posts from this blog

Why does Ruby on Rails generate add a blank line to the end of a file? -

running rails generate controller foo home results in: class foocontroller < application controller def home end end (there's nothing on line in actual file, blank line) is there purpose blank line? it's common use newline indicate end of line, last line. many editors (like vi, use) add in newline silently. consensus text files (especially in unix world) should end in newline, , there have been problems historically if wasn't present. why should text files end newline? the tool used count lines in file "wc" counts newlines in file, without trailing newline show 3 instead of 4. it improves readability of templates used in generator. consider: https://github.com/rails/rails/blob/master/railties/lib/rails/generators/rails/controller/templates/controller.rb to remove trailing newline, template have last line of: end<% end -%> instead of: end <% end -%> that seems less readable me. the discussion below refers ...
Read more

node.js - Bad Request - node js ajax post -

i'm using express 3.0 , node v0.11.0. have button submits form , i'm using ajax post data json object node server. client code is: $('#contact').submit(function(e) { console.log('submit called'); var formdata = json.stringify($('form').serializeobject()); console.log(formdata); $.ajax({ url: "http://localhost:3000/savedata/", type: "post", datatype: 'json', data: {objectdata: formdata}, contenttype: "application/json", complete: function() { console.log('process complete'); }, success: function(data) { console.log('process sucess'); }, error: function() { console.log('process error'); }, }); return false; }); then on server: var express = require('express'); var app = express(); app.set('views', __dirname + '/views'); app.set('view engine', 'jade'); app.use(express.bodyparser());...
Read more

uitableview - Create and use custom prototype table cells in xamarin ios using storyboard -

Image
is possible create , use 'custom' prototype table cells in xamarin ios (monotouch) using storyboard? i find stuart lodge explaining method using xib/nibs: http://www.youtube.com/watch?feature=player_embedded&v=vd1p2gz8jfy let's answer question! looking one. :) 1) open storyboard have viewcontroller tableview: add prototype cell (if there no cell added before): customize cell want (in case there custom uiimage , label): remember set height of cell. select whole tableview , properties window select "layout" tab. on top of properties window should see "row height" - put appropriate value: now select prototype cell once again. in properties window type name of class (it create code-behind class it). in case "friendscustomtableviewcell". after provide "identifier" cell. can see "friendcell". last thing set "style" property set custom. "name" field should empty. once click ...
Read more