From: "Johannes Thyssen Tishman" Subject: gcc, fortran and OpenMP To: Date: Fri, 20 Sep 2024 00:05:10 +0200 I'm working on porting cad/calculix (attached w/dependency) which is required to perform FEM analyses on cad/freecad, another port I've been working on[1]. To build calculix-ccx, the file 'omp_lib.mod' is needed (full build log attached), which only seems to be provided by the currently broken lang/flang/flang. I couldn't find a way to compile calculix-ccx without OpenMP support and I have zero knowledge on fortran to find out if this can be patched. I found here[2] a previous effort to include this file among others with lang/gcc/8, but I believe this never happened. Is this something that could perhaps be reconsidered? If not, any ideas for a workaround? Thank you. [1] https://forum.freecad.org/viewtopic.php?t=80792 [2] https://marc.info/?l=openbsd-ports&m=159260052211114&w=2 ===> Building from scratch calculix-ccx-2.22 ===> Checking files for calculix-ccx-2.22 ===> calculix-ccx-2.22 depends on: gcc-libs->=8,<9 -> gcc-libs-8.4.0p25 ===> calculix-ccx-2.22 depends on: spooles-* -> spooles-2.2 `/usr/ports/distfiles/ccx_2.22.src.tar.bz2' is up to date. ===> calculix-ccx-2.22 depends on: arpack-* -> arpack-3.8.0p1v0 ===> calculix-ccx-2.22 depends on: gcc->=8,<9 -> gcc-8.4.0p25 ===> calculix-ccx-2.22 depends on: g95->=8,<9 -> g95-8.4.0p25 ===> calculix-ccx-2.22 depends on: bzip2-* -> bzip2-1.0.8p0 >> (SHA256) ccx_2.22.src.tar.bz2: OK ===> Verifying specs: gfortran>=8 quadmath ===> found gfortran.8.0 quadmath.3.0 ===> Extracting for calculix-ccx-2.22 ===> calculix-ccx-2.22 depends on: arpack-* -> arpack-3.8.0p1v0 ===> calculix-ccx-2.22 depends on: gcc->=8,<9 -> gcc-8.4.0p25 ===> Patching for calculix-ccx-2.22 ===> calculix-ccx-2.22 depends on: g95->=8,<9 -> g95-8.4.0p25 ===> Applying OpenBSD patch patch-CalculiX_h Hmm... Looks like a unified diff to me... The text leading up to this was: -------------------------- |Index: CalculiX.h |--- CalculiX.h.orig |+++ CalculiX.h -------------------------- Patching file CalculiX.h using Plan A... Hunk #1 succeeded at 21. Hunk #2 succeeded at 31. done ===> Applying OpenBSD patch patch-Makefile Hmm... Looks like a unified diff to me... The text leading up to this was: -------------------------- |Index: Makefile |--- Makefile.orig |+++ Makefile -------------------------- Patching file Makefile using Plan A... Hunk #1 succeeded at 1. Hunk #2 succeeded at 20. done ===> calculix-ccx-2.22 depends on: bzip2-* -> bzip2-1.0.8p0 ===> Compiler link: gcc -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egcc ===> Compiler link: cc -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egcc ===> Compiler link: gfortran -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/local/bin/egfortran ===> Compiler link: clang -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/clang ===> Compiler link: clang++ -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/clang++ ===> Compiler link: c++ -> env CCACHE_DIR=/usr/ports/pobj/.ccache ccache /usr/bin/c++ ===> calculix-ccx-2.22 depends on: gcc-libs->=8,<9 -> gcc-libs-8.4.0p25 ===> Generating configure for calculix-ccx-2.22 ===> Configuring for calculix-ccx-2.22 ===> Verifying specs: gfortran>=8 quadmath ===> found gfortran.8.0 quadmath.3.0 ===> Building for calculix-ccx-2.22 cc -Wall -O2 -I /usr/local/include -DARCH="OpenBSD" -DSPOOLES -DARPACK -DMATRIXSTORAGE -DNETWORKOUT -c ccx_2.22.c In file included from ccx_2.22.c:30: ccx_2.22.c: In function 'main': CalculiX.h:63:29: warning: 'nkon0' may be used uninitialized in this function [-Wmaybe-uninitialized] #define RENEW(a,b,c) a=(b *)u_realloc((b *)(a),(c)*sizeof(b),__FILE__,__LINE__,#a) ^~~~~~~~~ ccx_2.22.c:72:43: note: 'nkon0' was declared here iprestr,kode,isolver,nslavs,nkon_,ne1,nkon0,mortar, ^~~~~ ccx_2.22.c:1789:53: warning: 'ne1' may be used uninitialized in this function [-Wmaybe-uninitialized] if((ne1d!=0)||(ne2d!=0)) RENEW(offset,double,2*ne1); ^ ccx_2.22.c:63:22: warning: 'nxstate' may be used uninitialized in this function [-Wmaybe-uninitialized] *ipoinpc=NULL,mt,nxstate,nload0,iload,*iuel=NULL,*ne2boun=NULL, ^~~~~~~ gfortran -Wall -O2 -c absolute_relative.f absolute_relative.f:20:20: & kon,ipkon, nactdog,identity,ielprop,prop,kflag,v, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] absolute_relative.f:22:25: & iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] absolute_relative.f:20:14: & kon,ipkon, nactdog,identity,ielprop,prop,kflag,v, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] absolute_relative.f:39:13: & p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1, 1 Warning: Unused variable 'p1' declared at (1) [-Wunused-variable] absolute_relative.f:39:16: & p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1, 1 Warning: Unused variable 'p2' declared at (1) [-Wunused-variable] absolute_relative.f:40:21: & kdkp1,u,pi,Qred_crit,pt1,pt2,Tt1,Tt2,ct,fact, 1 Warning: Unused variable 'pi' declared at (1) [-Wunused-variable] absolute_relative.f:40:31: & kdkp1,u,pi,Qred_crit,pt1,pt2,Tt1,Tt2,ct,fact, 1 Warning: Unused variable 'qred_crit' declared at (1) [-Wunused-variable] absolute_relative.f:21:55: & xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] absolute_relative.f:39:19: & p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1, 1 Warning: Unused variable 't1' declared at (1) [-Wunused-variable] absolute_relative.f:39:22: & p1,p2,T1,T2,cp,physcon(*),km1,kp1,kdkm1, 1 Warning: Unused variable 't2' declared at (1) [-Wunused-variable] absolute_relative.f:21:69: & xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] absolute_relative.f:21:64: & xflow,f,nodef,idirf,df,cp,R,physcon,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c acctube.f acctube.f:21:31: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument] acctube.f:21:28: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument] acctube.f:21:45: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument] acctube.f:20:59: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument] acctube.f:22:31: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] acctube.f:20:30: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument] acctube.f:21:62: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument] acctube.f:21:25: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument] acctube.f:20:38: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument] acctube.f:19:64: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] acctube.f:22:39: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] acctube.f:20:49: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument] acctube.f:19:58: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] acctube.f:19:54: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument] acctube.f:20:21: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument] acctube.f:19:48: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument] acctube.f:19:30: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument] acctube.f:19:36: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument] acctube.f:21:19: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument] acctube.f:19:42: subroutine acctube(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument] acctube.f:21:50: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument] acctube.f:21:41: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument] acctube.f:20:43: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument] acctube.f:21:33: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument] acctube.f:21:54: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] acctube.f:22:24: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] acctube.f:22:19: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] acctube.f:20:51: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument] acctube.f:20:57: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c acctube_one.f acctube_one.f:21:31: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument] acctube_one.f:21:28: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument] acctube_one.f:21:45: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument] acctube_one.f:20:59: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument] acctube_one.f:22:31: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] acctube_one.f:20:30: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument] acctube_one.f:21:62: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument] acctube_one.f:21:25: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument] acctube_one.f:20:38: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument] acctube_one.f:19:68: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] acctube_one.f:22:39: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] acctube_one.f:20:49: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument] acctube_one.f:19:62: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] acctube_one.f:19:58: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument] acctube_one.f:20:21: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument] acctube_one.f:19:52: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument] acctube_one.f:19:34: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument] acctube_one.f:19:40: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument] acctube_one.f:21:19: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument] acctube_one.f:19:46: subroutine acctube_one(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument] acctube_one.f:21:50: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument] acctube_one.f:21:41: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument] acctube_one.f:20:43: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument] acctube_one.f:21:33: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument] acctube_one.f:21:54: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,mi,ider, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] acctube_one.f:22:24: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] acctube_one.f:22:19: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] acctube_one.f:20:51: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument] acctube_one.f:20:57: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c actideacti.f gfortran -Wall -O2 -c actideactistr.f gfortran -Wall -O2 -c add_bo_st.f gfortran -Wall -O2 -c addimd.f gfortran -Wall -O2 -c addimdnodecload.f gfortran -Wall -O2 -c addimdnodedload.f addimdnodedload.f:34:0: & ifaceq(8,6),ifacew(8,5),ifacet(6,4),ig,ielem,nope,imdnode(*), Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c addimdnodedof.f gfortran -Wall -O2 -c addizdofcload.f addizdofcload.f:20:44: & nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans, 1 Warning: Unused dummy argument 'imdnode' at (1) [-Wunused-dummy-argument] addizdofcload.f:20:52: & nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans, 1 Warning: Unused dummy argument 'nmdnode' at (1) [-Wunused-dummy-argument] addizdofcload.f:20:58: & nzdof,iforc,iznode,nznode,nk,imdnode,nmdnode,xforc,ntrans, 1 Warning: Unused dummy argument 'xforc' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c addizdofdload.f addizdofdload.f:33:0: & ifacew(8,5),ifacet(7,4),ig,ielem,nope,iznode(*),nznode, Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c add_sm_ei.f gfortran -Wall -O2 -c add_sm_fl.f gfortran -Wall -O2 -c add_sm_st_as.f gfortran -Wall -O2 -c add_sm_st_corio.f add_sm_st_corio.f:19:38: subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1) 1 Warning: Unused dummy argument 'ad' at (1) [-Wunused-dummy-argument] add_sm_st_corio.f:19:59: subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1) 1 Warning: Unused dummy argument 'i0' at (1) [-Wunused-dummy-argument] add_sm_st_corio.f:19:62: subroutine add_sm_st_corio(au,ad,jq,irow,i,j,value,i0,i1) 1 Warning: Unused dummy argument 'i1' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c add_sm_st.f gfortran -Wall -O2 -c adjacentbounodes.f gfortran -Wall -O2 -c adjustcontactnodes.f adjustcontactnodes.f:20:53: & co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit, 1 Warning: Unused dummy argument 'iinc' at (1) [-Wunused-dummy-argument] adjustcontactnodes.f:20:57: & co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit, 1 Warning: Unused dummy argument 'iit' at (1) [-Wunused-dummy-argument] adjustcontactnodes.f:20:18: & co,vold,xo,yo,zo,x,y,z,nx,ny,nz,istep,iinc,iit, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] adjustcontactnodes.f:38:0: & istart,ilength,nope,nopes,nelems,jj,ifaces,itiefac(2,*), Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] adjustcontactnodes.f:232:0: & iendset(iset)-istartset(iset)+1,id) Warning: 'iset' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c addshell.f gfortran -Wall -O2 -c advecforc.f advecforc.f:20:48: & nload,lakon,xload,istep,time,ttime,dtime,sideload,vold,mi, 1 Warning: Unused dummy argument 'dtime' at (1) [-Wunused-dummy-argument] advecforc.f:21:32: & xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'nmethod' at (1) [-Wunused-dummy-argument] advecforc.f:21:24: & xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'reltime' at (1) [-Wunused-dummy-argument] advecforc.f:21:16: & xloadold,reltime,nmethod,tnl,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'xloadold' at (1) [-Wunused-dummy-argument] advecforc.f:171:0: areaj=dxsj2*weight Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c advecstiff.f advecstiff.f:20:48: & nload,lakon,xload,istep,time,ttime,dtime,sideload,vold,mi, 1 Warning: Unused dummy argument 'dtime' at (1) [-Wunused-dummy-argument] advecstiff.f:21:32: & xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'nmethod' at (1) [-Wunused-dummy-argument] advecstiff.f:21:24: & xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'reltime' at (1) [-Wunused-dummy-argument] advecstiff.f:21:16: & xloadold,reltime,nmethod,s,iinc,iponoel,inoel,ielprop,prop, 1 Warning: Unused dummy argument 'xloadold' at (1) [-Wunused-dummy-argument] advecstiff.f:165:0: areaj=dxsj2*weight Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c air_valve.f air_valve.f:21:57: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'co' at (1) [-Wunused-dummy-argument] air_valve.f:21:31: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'cp' at (1) [-Wunused-dummy-argument] air_valve.f:21:28: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'df' at (1) [-Wunused-dummy-argument] air_valve.f:21:45: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument] air_valve.f:20:59: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'f' at (1) [-Wunused-dummy-argument] air_valve.f:22:31: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] air_valve.f:20:30: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'identity' at (1) [-Wunused-dummy-argument] air_valve.f:21:25: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'idirf' at (1) [-Wunused-dummy-argument] air_valve.f:20:38: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument] air_valve.f:19:66: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] air_valve.f:22:39: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] air_valve.f:20:49: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'kflag' at (1) [-Wunused-dummy-argument] air_valve.f:19:60: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] air_valve.f:19:56: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument] air_valve.f:20:21: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'nactdog' at (1) [-Wunused-dummy-argument] air_valve.f:19:50: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nelem' at (1) [-Wunused-dummy-argument] air_valve.f:19:32: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node1' at (1) [-Wunused-dummy-argument] air_valve.f:19:38: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'node2' at (1) [-Wunused-dummy-argument] air_valve.f:21:19: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'nodef' at (1) [-Wunused-dummy-argument] air_valve.f:19:44: subroutine air_valve(node1,node2,nodem,nelem,lakon,kon,ipkon, 1 Warning: Unused dummy argument 'nodem' at (1) [-Wunused-dummy-argument] air_valve.f:21:50: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'numf' at (1) [-Wunused-dummy-argument] air_valve.f:21:41: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'physcon' at (1) [-Wunused-dummy-argument] air_valve.f:20:43: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument] air_valve.f:21:33: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'r' at (1) [-Wunused-dummy-argument] air_valve.f:21:54: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] air_valve.f:22:24: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] air_valve.f:22:19: & ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] air_valve.f:20:51: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'v' at (1) [-Wunused-dummy-argument] air_valve.f:21:62: & nodef,idirf,df,cp,r,physcon,dvi,numf,set,co,vold,mi, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] air_valve.f:20:57: & nactdog,identity,ielprop,prop,kflag,v,xflow,f, 1 Warning: Unused dummy argument 'xflow' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c allocation.f allocation.f:2219:0: submset(12:12)=selabel Warning: 'selabel[1]{lb: 1 sz: 1}' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:1534:0: nk_=nk_+numnodes Warning: 'numnodes' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:1158:0: nkon_=nkon_+nopeexp Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:1147:0: if(nteller.lt.nope) then Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:2434:0: & multmast*meminset(imastset)) Warning: 'multslav' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:2434:0: Warning: 'multmast' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:55:0: & istat,n,key,meminset(*),i,js,inoset,mi(*),ii,ipol,inl, Warning: 'js' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:420:0: surface(ipos:ipos)='T' Warning: 'ipos' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation.f:1533:0: if(iorientation.eq.0) then Warning: 'iorientation' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c allocation_rfn.f allocation_rfn.f:104:0: nkon_=nkon_+nopeexp Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized] allocation_rfn.f:98:0: if(nteller+n.gt.nope) n=nope-nteller Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c allocont.f gfortran -Wall -O2 -c amplitudes.f amplitudes.f:20:27: & nam_,namtot_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp, 1 Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument] amplitudes.f:20:33: & nam_,namtot_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp, 1 Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c angsum.f angsum.f:73:0: cotet(k,j+1)=co(k,nnr) Warning: 'nnr' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c anisomaxwavspd.f gfortran -Wall -O2 -c anisonl.f gfortran -Wall -O2 -c anisotropic.f gfortran -Wall -O2 -c applybounfem.f gfortran -Wall -O2 -c applybounp.f gfortran -Wall -O2 -c approxplane.f gfortran -Wall -O2 -c assigndomtonodes.f gfortran -Wall -O2 -c attach_1d.f gfortran -Wall -O2 -c attach_1d_cracklength.f gfortran -Wall -O2 -c attach_2d.f gfortran -Wall -O2 -c attach_3d.f gfortran -Wall -O2 -c attachline.f gfortran -Wall -O2 -c autocovmatrix.f gfortran -Wall -O2 -c basemotions.f gfortran -Wall -O2 -c basis.f gfortran -Wall -O2 -c beamextscheme.f gfortran -Wall -O2 -c beamgeneralsections.f beamgeneralsections.f:23:35: & nprop,nprop_,prop,nelcon,ier) 1 Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument] beamgeneralsections.f:373:0: thicke(2,indexe+l)=thickness2 Warning: 'thickness2' may be used uninitialized in this function [-Wmaybe-uninitialized] beamgeneralsections.f:383:0: thicke(1,indexe+l)=thickness1 Warning: 'thickness1' may be used uninitialized in this function [-Wmaybe-uninitialized] beamgeneralsections.f:294:0: nprop=nprop+ndprop Warning: 'ndprop' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c beamintscheme.f gfortran -Wall -O2 -c beammpc.f beammpc.f:112:0: nodempc(1,mpcfree)=nodeb Warning: 'nodeb' may be used uninitialized in this function [-Wmaybe-uninitialized] beammpc.f:68:0: if(l.gt.3) l=1 Warning: 'jmax' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c beamsections.f beamsections.f:23:25: & ipoinpc,mi,nelcon,ier) 1 Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c biotsavart.f biotsavart.f:140:0: c2=weight*xsj/((r(1)*r(1)+r(2)*r(2)+r(3)*r(3))**(1.5d0)) Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] biotsavart.f:121:0: elseif(nope.eq.6) then Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] biotsavart.f:28:0: integer ipkon(*),kon(*),ne,i,nka,nkb,mint3d,konl(26), Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c bodyadd.f bodyadd.f:51:0: if(ilabel.eq.2) then Warning: 'ilabel' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c bodyforce.f bodyforce.f:19:52: subroutine bodyforce(cbody,ibody,ipobody,nbody,set,istartset, 1 Warning: Unused dummy argument 'nbody' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c bounadd.f gfortran -Wall -O2 -c bounaddf.f bounaddf.f:23:38: & typeboun,nmethod,iperturb,vold,mi, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] bounaddf.f:43:0: & iy(3),inumber,iface,nload,nelemload(2,*),nopes,kon(*),nope, Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] bounaddf.f:180:0: elseif(nope.eq.4) then Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c boundaryfs.f gfortran -Wall -O2 -c boundarymesh.f gfortran -Wall -O2 -c boundarys.f boundarys.f:44:68: & ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie, 1 Warning: Unused variable 'ie' declared at (1) [-Wunused-variable] boundarys.f:44:65: & ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie, 1 Warning: Unused variable 'is' declared at (1) [-Wunused-variable] boundarys.f:44:62: & ilmpc(*),nmpcold,id,idof,index1,ntrans,nk_,ipos,m,node,is,ie, 1 Warning: Unused variable 'node' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c bsort.f gfortran -Wall -O2 -c buckles.f gfortran -Wall -O2 -c calcdatarget.f calcdatarget.f:30:58: integer i,j,ifront(*),nnfront,istartfront(*),nstep,m, 1 Warning: Unused variable 'm' declared at (1) [-Wunused-variable] calcdatarget.f:20:62: & iendfront,isubsurffront,damax,datarget,acrack,nstep) 1 Warning: Unused dummy argument 'nstep' at (1) [-Wunused-dummy-argument] calcdatarget.f:106:0: xlan=dsqrt((xn-xa)**2+(yn-ya)**2+(zn-za)**2) Warning: 'zn' may be used uninitialized in this function [-Wmaybe-uninitialized] calcdatarget.f:106:0: Warning: 'yn' may be used uninitialized in this function [-Wmaybe-uninitialized] calcdatarget.f:106:0: Warning: 'xn' may be used uninitialized in this function [-Wmaybe-uninitialized] calcdatarget.f:117:0: rcur=xlpa*xlan*xlnp/denominator Warning: 'xlan' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcdev.f gfortran -Wall -O2 -c calcdhds.f gfortran -Wall -O2 -c calceigenvalues.f gfortran -Wall -O2 -c calcenergy.f calcenergy.f:19:57: subroutine calcenergy(ipkon,lakon,kon,co,ener,mi,ne, 1 Warning: Unused dummy argument 'ne' at (1) [-Wunused-dummy-argument] calcenergy.f:171:0: mint3d=8*nlayer Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized] calcenergy.f:29:0: & konl(20),mint3d,jj,iflag,ne,ki,kl,ilayer,nlayer,kk, Warning: 'ilayer' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcexternalwork.f calcexternalwork.f:269:0: & (disp(1)*xsj2(1)+disp(2)*xsj2(2)+disp(3)*xsj2(3)) Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] calcexternalwork.f:269:0: Warning: 'pres' may be used uninitialized in this function [-Wmaybe-uninitialized] calcexternalwork.f:251:0: elseif(nopes.eq.6) then Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] calcexternalwork.f:32:0: & jj,ig,nope,nopes,igpres,id, Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] calcexternalwork.f:33:0: & mint2d,ifacet(6,4),ifacew(8,5),iflag,indexe,jface,istartset(*), Warning: 'mint2d' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcfeasibledirection_gd.f calcfeasibledirection_gd.f:20:16: & nactive,nobject,nk,gradproj) 1 Warning: Unused dummy argument 'nactive' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c calcfeasibledirection_gp.f calcfeasibledirection_gp.f:20:24: & nactive,nobject,nk,gradproj) 1 Warning: Unused dummy argument 'nobject' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c calcgeomelemnet.f calcgeomelemnet.f:20:28: & time,ielprop,mi,A,A2,d,l,s) 1 Warning: Unused dummy argument 'a2' at (1) [-Wunused-dummy-argument] calcgeomelemnet.f:20:30: & time,ielprop,mi,A,A2,d,l,s) 1 Warning: Unused dummy argument 'd' at (1) [-Wunused-dummy-argument] calcgeomelemnet.f:20:32: & time,ielprop,mi,A,A2,d,l,s) 1 Warning: Unused dummy argument 'l' at (1) [-Wunused-dummy-argument] calcgeomelemnet.f:20:34: & time,ielprop,mi,A,A2,d,l,s) 1 Warning: Unused dummy argument 's' at (1) [-Wunused-dummy-argument] calcgeomelemnet.f:20:12: & time,ielprop,mi,A,A2,d,l,s) 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] calcgeomelemnet.f:19:63: subroutine calcgeomelemnet(vold,co,prop,lakon,nelem,ttime, 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c calch0interface.f gfortran -Wall -O2 -c calcheatnet.f calcheatnet.f:20:61: & ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody, 1 Warning: Unused dummy argument 'ibody' at (1) [-Wunused-dummy-argument] calcheatnet.f:20:55: & ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody, 1 Warning: Unused dummy argument 'ipobody' at (1) [-Wunused-dummy-argument] calcheatnet.f:20:67: & ielmat,ntmat_,shcon,nshcon,rhcon,nrhcon,ipobody,ibody,xbody, 1 Warning: Unused dummy argument 'xbody' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c calc_ider_cross_split.f gfortran -Wall -O2 -c calc_ider_tee.f gfortran -Wall -O2 -c calc_ider_wye.f gfortran -Wall -O2 -c calcmac.f gfortran -Wall -O2 -c calcmach.f gfortran -Wall -O2 -c calcmass.f calcmass.f:20:22: & mi,nelem,ne,thicke,ielmat,nope,t0,rhcon,nrhcon,ntmat_, 1 Warning: Unused dummy argument 'ne' at (1) [-Wunused-dummy-argument] calcmass.f:166:0: mint3d=8*nlayer Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcmechstrain.f gfortran -Wall -O2 -c calcnormal.f calcnormal.f:178:0: if(nface.eq.3) then Warning: 'nface' may be used uninitialized in this function [-Wmaybe-uninitialized] calcnormal.f:301:0: elseif(nopes.eq.8) then Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calc_residual_cross_split.f calc_residual_cross_split.f:22:33: &pt2,Tt2,ichan_num,A1,A2,A_s,dh1,dh2,alpha,zeta_fac, 1 Warning: Unused dummy argument 'a_s' at (1) [-Wunused-dummy-argument] calc_residual_cross_split.f:46:56: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'asa1' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:23:18: &kappa,R,ider,iflag) 1 Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument] calc_residual_cross_split.f:27:58: integer icase,ichan_num,ider,icrit1,icrit2,iflag,ier 1 Warning: Unused variable 'ier' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:38: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'pspt_s' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:38:13: &pt2_lim, 1 Warning: Unused variable 'pt2_lim' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:26: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'q_s' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:48:29: real*8 Table_zeta(2,10) 1 Warning: Unused variable 'table_zeta' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:31: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'ts_s' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:61: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'vsv1' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:42: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'w_s' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:47: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'wsw1' declared at (1) [-Wunused-variable] calc_residual_cross_split.f:46:22: &zeta_fac,xflow_s,Q_s,Ts_s,pspt_s,w_s,wsw1,A_s,AsA1,VsV1 1 Warning: Unused variable 'xflow_s' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c calc_residual_tee.f calc_residual_tee.f:19:41: &pt2,Tt2,A1,A2,zeta_fac,kappa,R,ider,iflag,zeta) 1 Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument] calc_residual_tee.f:55:13: &pt2_lim, 1 Warning: Unused variable 'pt2_lim' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c calc_residual_wye.f calc_residual_wye.f:228:3: 80 format(3x,a,f10.6,a,f10.2,a,f10.6) 1 Warning: Label 80 at (1) defined but not used [-Wunused-label] calc_residual_wye.f:229:3: 77 format(3x,a,f10.6,a,f10.2,a,f10.6) 1 Warning: Label 77 at (1) defined but not used [-Wunused-label] calc_residual_wye.f:21:38: & pt2,Tt2,ichan_num,A1,A2,A_s,dh1,dh2,alpha,zeta_fac,kappa, 1 Warning: Unused dummy argument 'a_s' at (1) [-Wunused-dummy-argument] calc_residual_wye.f:22:17: & R,ider,iflag,zeta) 1 Warning: Unused dummy argument 'ider' at (1) [-Wunused-dummy-argument] calc_residual_wye.f:79:26: real*8 Table_A(2,11) 1 Warning: Unused variable 'table_a' declared at (1) [-Wunused-variable] calc_residual_wye.f:51:15: & Ts_s, 1 Warning: Unused variable 'ts_s' declared at (1) [-Wunused-variable] calc_residual_wye.f:66:15: & VsV1, 1 Warning: Unused variable 'vsv1' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c calcspringforc.f gfortran -Wall -O2 -c calcstabletimeinccont.f calcstabletimeinccont.f:176:0: & ((springmm+springms)*xk)) Warning: 'springfac' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcstabletimeincvol.f calcstabletimeincvol.f:338:0: volume=weight*xsj Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] calcstabletimeincvol.f:63:0: & konl(26),nopered,npmat_,nmat,kon(*),indexe,iflag,nopes, Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcstress.f calcstress.f:164:0: p_(j)=p_(j)*maxs Warning: 'p_[2]' may be used uninitialized in this function [-Wmaybe-uninitialized] calcstress.f:164:0: Warning: 'p_[1]' may be used uninitialized in this function [-Wmaybe-uninitialized] calcstress.f:164:0: Warning: 'p_[0]' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcstressheatfluxfem.f calcstressheatfluxfem.f:33:0: & jj,indexe,isti,iqfx,kk,ielmat(mi(3),*),nshcon(*),ntmat_,nope, Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] calcstressheatfluxfem.f:34:0: & imat,ncocon(2,*),mint3d,k1,ipvar(*),index,iturbulent,nk, Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized] calcstressheatfluxfem.f:158:0: if(compressible.eq.1) t(i1,i1)=t(i1,i1)-2.d0*div/3.d0 Warning: 'div' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcsurf.f gfortran -Wall -O2 -c calctotstrain.f gfortran -Wall -O2 -c calculated.f gfortran -Wall -O2 -c calculateh.f calculateh.f:114:0: h(i)=h(i)*targetsize/size Warning: 'size' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calculatehmid.f gfortran -Wall -O2 -c calcview.f calcview.f:49:39: & dirloc(3),dist(*),area(*),dd,p21(3),sidemean,r(3,3), 1 Warning: Unused variable 'dd' declared at (1) [-Wunused-variable] calcview.f:37:17: integer ntr,i,j,k,l,mi(*),ntria,ntrib, 1 Warning: Unused variable 'ntr' declared at (1) [-Wunused-variable] calcview.f:40:56: & k1,kflag,idist(*),ndist,i2,i3,ng,idi,idj,ntri, 1 Warning: Unused variable 'ntri' declared at (1) [-Wunused-variable] calcview.f:45:50: & pmid(3,*),e3(4,*),e1(3,*),e2(3,*),p1(3),p2(3),p3(3), 1 Warning: Unused variable 'p1' declared at (1) [-Wunused-variable] calcview.f:28:49: & ntrit,mi,jqrad,irowrad,nzsrad,sidemean,ntria,ntrib, 1 Warning: Unused dummy argument 'sidemean' at (1) [-Wunused-dummy-argument] calcview.f:46:14: & x,y,porigin(3),yqmin,yqmax,xqmin,anglemin,distance, 1 Warning: Unused variable 'y' declared at (1) [-Wunused-variable] calcview.f:504:37: real*8 function fform(x,y,idata,rdata) 1 Warning: Unused dummy argument 'idata' at (1) [-Wunused-dummy-argument] calcview.f:408:0: if(((imin.eq.1).and.(imax.eq.2)).or. Warning: 'imin' may be used uninitialized in this function [-Wmaybe-uninitialized] calcview.f:408:0: Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c calcvol.f gfortran -Wall -O2 -c calinput.f gfortran -Wall -O2 -c calinput_rfn.f gfortran -Wall -O2 -c carbon_seal.f carbon_seal.f:22:25: & iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] carbon_seal.f:21:48: & nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] carbon_seal.f:21:62: & nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] carbon_seal.f:21:57: & nodef,idirf,df,R,physcon,dvi,numf,set,mi,ttime,time, 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c catedges_crackprop.f gfortran -Wall -O2 -c catedges_refine.f gfortran -Wall -O2 -c catnodes.f gfortran -Wall -O2 -c cattet.f gfortran -Wall -O2 -c cattri.f gfortran -Wall -O2 -c cavity_refine.f cavity_refine.f:534:0: if(isol.eq.0) then Warning: 'isol' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cavityext_refine.f cavityext_refine.f:751:0: if(isol.eq.0) then Warning: 'isol' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cd_bleedtapping.f cd_bleedtapping.f:34:32: integer nummer,id,i,number,curve,index 1 Warning: Unused variable 'number' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c cd_bragg.f cd_bragg.f:29:47: subroutine cd_bragg(cd,p2p1,cdbragg,itype) 1 Warning: Unused dummy argument 'itype' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c cd_chamfer.f gfortran -Wall -O2 -c cd_lab_1spike.f gfortran -Wall -O2 -c cd_lab_correction.f gfortran -Wall -O2 -c cd_lab_honeycomb.f gfortran -Wall -O2 -c cd_lab_radius.f gfortran -Wall -O2 -c cd_lab_straight.f gfortran -Wall -O2 -c cd_lichtarowicz.f gfortran -Wall -O2 -c cd_Mcgreehan_Schotsch.f gfortran -Wall -O2 -c cd_ms_ms.f gfortran -Wall -O2 -c cd_own_albers.f gfortran -Wall -O2 -c cd_pk_albers.f gfortran -Wall -O2 -c cd_pk_ms.f gfortran -Wall -O2 -c cd_preswirlnozzle.f cd_preswirlnozzle.f:24:55: subroutine cd_preswirlnozzle(ps2,pt1,number,curve,x_tab,y_tab,cd) 1 Warning: Unused dummy argument 'curve' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c cfdconv.f gfortran -Wall -O2 -c cfds.f cfds.f:21:39: & inl,ipoinp,inp,ipoinpc,alpha,ctrl,iexpl,tincf,ttime,physcon, 1 Warning: Unused dummy argument 'alpha' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c cflux.f cflux.f:21:46: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'cocon' at (1) [-Wunused-dummy-argument] cflux.f:19:62: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument] cflux.f:20:60: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'ielmat' at (1) [-Wunused-dummy-argument] cflux.f:20:48: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'ielprop' at (1) [-Wunused-dummy-argument] cflux.f:20:40: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'inoel' at (1) [-Wunused-dummy-argument] cflux.f:20:16: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] cflux.f:20:34: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'iponoel' at (1) [-Wunused-dummy-argument] cflux.f:19:45: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument] cflux.f:20:20: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] cflux.f:19:40: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument] cflux.f:20:26: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'lakon' at (1) [-Wunused-dummy-argument] cflux.f:21:53: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'ncocon' at (1) [-Wunused-dummy-argument] cflux.f:19:55: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'node' at (1) [-Wunused-dummy-argument] cflux.f:21:33: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'nrhcon' at (1) [-Wunused-dummy-argument] cflux.f:21:20: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'nshcon' at (1) [-Wunused-dummy-argument] cflux.f:20:53: & mi,ipkon,kon,lakon,iponoel,inoel,ielprop,prop,ielmat, 1 Warning: Unused dummy argument 'prop' at (1) [-Wunused-dummy-argument] cflux.f:21:26: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'rhcon' at (1) [-Wunused-dummy-argument] cflux.f:21:13: & shcon,nshcon,rhcon,nrhcon,ntmat_,cocon,ncocon) 1 Warning: Unused dummy argument 'shcon' at (1) [-Wunused-dummy-argument] cflux.f:19:50: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] cflux.f:19:67: subroutine cflux(flux,msecpt,kstep,kinc,time,node,coords,vold, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c cfluxs.f gfortran -Wall -O2 -c changecontacttypes.f gfortran -Wall -O2 -c changedepterm.f gfortran -Wall -O2 -c changefrictions.f changefrictions.f:20:14: & irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc, 1 Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument] changefrictions.f:19:65: subroutine changefrictions(inpc,textpart,matname,nmat,nmat_, 1 Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c changekon.f gfortran -Wall -O2 -c changematerials.f changematerials.f:20:14: & irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc, 1 Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument] changematerials.f:19:65: subroutine changematerials(inpc,textpart,matname,nmat,nmat_, 1 Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c changeplastics.f gfortran -Wall -O2 -c changesolidsections.f changesolidsections.f:22:21: & ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier) 1 Warning: Unused dummy argument 'cs' at (1) [-Wunused-dummy-argument] changesolidsections.f:22:32: & ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] changesolidsections.f:35:48: & ielorien(mi(3),*),kon(*),ipkon(*),indexe,irstrt(*),nset,nmat, 1 Warning: Unused variable 'indexe' declared at (1) [-Wunused-variable] changesolidsections.f:21:30: & lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] changesolidsections.f:21:37: & lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl, 1 Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument] changesolidsections.f:21:24: & lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] changesolidsections.f:37:33: & istep,istat,n,key,i,j,k,l,imaterial,iorientation,ipos, 1 Warning: Unused variable 'l' declared at (1) [-Wunused-variable] changesolidsections.f:22:25: & ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier) 1 Warning: Unused dummy argument 'mcs' at (1) [-Wunused-dummy-argument] changesolidsections.f:22:50: & ipoinp,inp,cs,mcs,iaxial,ipoinpc,mi,nelcon,ier) 1 Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument] changesolidsections.f:21:20: & lakon,thicke,kon,ipkon,irstrt,istep,istat,n,iline,ipol,inl, 1 Warning: Unused dummy argument 'thicke' at (1) [-Wunused-dummy-argument] changesolidsections.f:40:38: real*8 thicke(mi(3),*),thickness,pi,cs(17,*) 1 Warning: Unused variable 'thickness' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c changesurfacebehaviors.f changesurfacebehaviors.f:20:20: & nmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc, 1 Warning: Unused dummy argument 'irstrt' at (1) [-Wunused-dummy-argument] changesurfacebehaviors.f:20:13: & nmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp,inp,ipoinpc, 1 Warning: Unused dummy argument 'nmat_' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c channeljointback.f channeljointback.f:336:0: u2=xflow2/(rho*area2) Warning: 'xflow2' may be used uninitialized in this function [-Wmaybe-uninitialized] channeljointback.f:332:0: u1=xflow1/(rho*area1) Warning: 'xflow1' may be used uninitialized in this function [-Wmaybe-uninitialized] channeljointback.f:360:0: v(2,nup2)=h2 Warning: 'nup2' may be used uninitialized in this function [-Wmaybe-uninitialized] channeljointback.f:110:0: istackb(2,nstackb)=nup1 Warning: 'nup1' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c channeljointfront.f channeljointfront.f:240:0: istackb(2,nstackb)=nup2 Warning: 'nup2' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c characteristic.f characteristic.f:22:42: & nodef,idirf,df,cp,r,physcon,dvi,numf,set, 1 Warning: Unused dummy argument 'dvi' at (1) [-Wunused-dummy-argument] characteristic.f:20:20: & kon,ipkon, 1 Warning: Unused dummy argument 'ipkon' at (1) [-Wunused-dummy-argument] characteristic.f:23:39: & mi,ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] characteristic.f:20:14: & kon,ipkon, 1 Warning: Unused dummy argument 'kon' at (1) [-Wunused-dummy-argument] characteristic.f:22:51: & nodef,idirf,df,cp,r,physcon,dvi,numf,set, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] characteristic.f:23:24: & mi,ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] characteristic.f:23:19: & mi,ttime,time,iaxial,iplausi) 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c characteristiclength.f gfortran -Wall -O2 -c checkconstraint.f checkconstraint.f:186:0: & abs(obj),bounds(iobj),objnorm(iobj), Warning: 'obj' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c checkcrosssections.f gfortran -Wall -O2 -c checkdispoutonly.f checkdispoutonly.f:19:39: subroutine checkdispoutonly(prlab,nprint,nlabel,filab, 1 Warning: Unused dummy argument 'prlab' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c checkexiedge.f gfortran -Wall -O2 -c checkforhomnet.f gfortran -Wall -O2 -c checkimpacts.f gfortran -Wall -O2 -c checkinputvaluesnet.f gfortran -Wall -O2 -c checkintegrity.f checkintegrity.f:24:0: & ifatet(4,*),iel1,iel2,j1,j2,j Warning: 'j2' may be used uninitialized in this function [-Wmaybe-uninitialized] checkintegrity.f:24:0: Warning: 'j1' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c checkjac.f gfortran -Wall -O2 -c checkprojectgrad.f checkprojectgrad.f:21:38: & inameactiold,g0,nobject,ndesi,nodedesi,dgdxglob,nk) 1 Warning: Unused dummy argument 'ndesi' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c checksharp.f gfortran -Wall -O2 -c checktemp.f gfortran -Wall -O2 -c checktempload.f gfortran -Wall -O2 -c checktime.f checktime.f:20:13: & istep,tper) 1 Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c checktruecontact.f gfortran -Wall -O2 -c checkvol.f gfortran -Wall -O2 -c chksurf.f chksurf.f:366:0: & /(vlen(1)*vlen(2))) Warning: 'lastvec[2]' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:366:0: Warning: 'lastvec[1]' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:366:0: Warning: 'lastvec[0]' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:366:0: Warning: 'vlen[0]' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:37:0: & iscount,lnod,icont,iston4tet(3,4) Warning: 'lnod' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:190:0: if(kon(ipkon(ielem1)+j).eq.isnode) Warning: 'isnode' may be used uninitialized in this function [-Wmaybe-uninitialized] chksurf.f:36:0: & isnode, isidx,ifreesur(3),iston20h(8,6),iston10tet(6,4), Warning: 'isidx' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cident80.f gfortran -Wall -O2 -c cident81.f gfortran -Wall -O2 -c cident.f gfortran -Wall -O2 -c clearances.f gfortran -Wall -O2 -c cload.f cload.f:19:39: subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold, 1 Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument] cload.f:19:34: subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold, 1 Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument] cload.f:19:44: subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] cload.f:19:66: subroutine cload(xload,kstep,kinc,time,node,idof,coords,vold, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] cload.f:114:0: xload=f1*a(idof,1)+f2*a(idof,2)+f3*a(idof,3) Warning: 'f1' may be used uninitialized in this function [-Wmaybe-uninitialized] cload.f:114:0: Warning: 'f2' may be used uninitialized in this function [-Wmaybe-uninitialized] cload.f:114:0: Warning: 'f3' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cloaddistributing.f gfortran -Wall -O2 -c cloads.f gfortran -Wall -O2 -c clonesensitivities.f clonesensitivities.f:25:32: integer nobject,nk,i,j,k,l,objective_id 1 Warning: Unused variable 'l' declared at (1) [-Wunused-variable] clonesensitivities.f:74:0: objectset(i,1)(40:81)=objectset(i,objective_id)(40:81) Warning: 'objective_id' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c closefile.f gfortran -Wall -O2 -c closefilefluid.f gfortran -Wall -O2 -c cmatrix.f gfortran -Wall -O2 -c combilcfhcf.f gfortran -Wall -O2 -c compdt.f compdt.f:95:0: dtmed=dh(i)*dh(i)*rho/(2.d0*dvi) Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c complexfrequencys.f gfortran -Wall -O2 -c con2phys.f gfortran -Wall -O2 -c condrandomfield.f gfortran -Wall -O2 -c conductivitys.f gfortran -Wall -O2 -c constassembly.f constassembly.f:41:72: write(5,'(a113)') ' ################################################ 1 Warning: Line truncated at (1) [-Wline-truncation] constassembly.f:52:72: write(5,'(a113)') ' ################################################ 1 Warning: Line truncated at (1) [-Wline-truncation] constassembly.f:31:0: & nset,ndesiboun,nodedesiboun(*),id,istartset(*),iendset(*), Warning: 'ndesiboun' may be used uninitialized in this function [-Wmaybe-uninitialized] constassembly.f:122:0: & abs(funcvalabs),bound,funcvalnorm,'ACTIVE ' Warning: 'funcvalabs' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c constraints.f gfortran -Wall -O2 -c contactdampings.f contactdampings.f:20:12: & nmat,ntmat_,ncmat_,irstrt,istep,istat,n,iline,ipol,inl,ipoinp, 1 Warning: Unused dummy argument 'nmat' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c contactpairs.f gfortran -Wall -O2 -c contactprints.f contactprints.f:21:37: & contactprint_flag,ithermal,istep,istat,n,iline,ipol,inl, 1 Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c contingentsurf.f contingentsurf.f:43:47: & pa,pb,pc,crackarea(*),v1(3),v2(3),al,p(3), 1 Warning: Unused variable 'al' declared at (1) [-Wunused-variable] contingentsurf.f:32:27: character*9 filelabel 1 Warning: Unused variable 'filelabel' declared at (1) [-Wunused-variable] contingentsurf.f:31:26: character*8 filename 1 Warning: Unused variable 'filename' declared at (1) [-Wunused-variable] contingentsurf.f:30:26: character*5 outlabel 1 Warning: Unused variable 'outlabel' declared at (1) [-Wunused-variable] contingentsurf.f:40:0: & itrend,itrendprev Warning: 'itrend' may be used uninitialized in this function [-Wmaybe-uninitialized] contingentsurf.f:297:0: if(alambda.gt.alambdaprev) then Warning: 'alambdaprev' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c contraction.f contraction.f:24:27: & mi,v,inv,epsilon,co) 1 Warning: Unused dummy argument 'epsilon' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c controlss.f controlss.f:19:51: subroutine controlss(inpc,textpart,ctrl,istep,istat,n,iline,ipol, 1 Warning: Unused dummy argument 'istep' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c copysens.f gfortran -Wall -O2 -c coriolissolve.f coriolissolve.f:181:0: x(j,id+1)=temp(j,ksmall) Warning: 'ksmall' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c correctem.f correctem.f:32:0: integer nprint,ne,ipkon(*),ncmat_,ntmat_,nk,i,ii,mint3d,k, Warning: 'mint3d' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c correlationlengths.f gfortran -Wall -O2 -c couplings.f couplings.f:678:0: xsj=weight*dsqrt(xsj2(1)**2+xsj2(2)**2+xsj2(3)**2) Warning: 'weight' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:48:0: & npt,mint,mpcfreeold,id,idof,iflag,nk_,l,ndirboun(*), Warning: 'mint' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:49:0: & irotnode_kin,idupnode,ier,nopes,nfcstart,nfc,ikdc(*),ndc, Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:47:0: & kon(*),istep,nelem,ics(2,*),nodef(8),nboun_,nodeboun(*), Warning: 'nelem' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:42:0: & iorientation,iface,jface,nset,nboun,istat,n,i,j,k,ibounstart, Warning: 'jface' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:255:0: node=kon(indexe+ifaceq(m,jface)) Warning: 'indexe' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:478:0: if(surfkind.eq.'S') then Warning: 'surfkind[1]{lb: 1 sz: 1}' may be used uninitialized in this function [-Wmaybe-uninitialized] couplings.f:509:0: do k=istartset(jsurf),iendset(jsurf) Warning: 'jsurf' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c couptempdisps.f gfortran -Wall -O2 -c cp_corrected.f gfortran -Wall -O2 -c cracklength.f cracklength.f:46:40: & acrackglob(*),dlength,alambda,pneigh(3,2),xil,pnode(3), 1 Warning: Unused variable 'alambda' declared at (1) [-Wunused-variable] cracklength.f:45:45: & acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2), 1 Warning: Unused variable 'coords' declared at (1) [-Wunused-variable] cracklength.f:47:45: & doubleglob(*),dummy(1),dist,cosang 1 Warning: Unused variable 'cosang' declared at (1) [-Wunused-variable] cracklength.f:22:37: & ifront,posfront,doubleglob,integerglob, 1 Warning: Unused dummy argument 'doubleglob' at (1) [-Wunused-dummy-argument] cracklength.f:47:33: & doubleglob(*),dummy(1),dist,cosang 1 Warning: Unused variable 'dummy' declared at (1) [-Wunused-variable] cracklength.f:39:53: & konl(20),istartset(1),iendset(1),ialset(1),iselect(1), 1 Warning: Unused variable 'ialset' declared at (1) [-Wunused-variable] cracklength.f:20:58: & co,istartcrackbou,iendcrackbou,costruc,ibounnod,xt,acrack, 1 Warning: Unused dummy argument 'ibounnod' at (1) [-Wunused-dummy-argument] cracklength.f:39:43: & konl(20),istartset(1),iendset(1),ialset(1),iselect(1), 1 Warning: Unused variable 'iendset' declared at (1) [-Wunused-variable] cracklength.f:39:64: & konl(20),istartset(1),iendset(1),ialset(1),iselect(1), 1 Warning: Unused variable 'iselect' declared at (1) [-Wunused-variable] cracklength.f:39:32: & konl(20),istartset(1),iendset(1),ialset(1),iselect(1), 1 Warning: Unused variable 'istartset' declared at (1) [-Wunused-variable] cracklength.f:39:19: & konl(20),istartset(1),iendset(1),ialset(1),iselect(1), 1 Warning: Unused variable 'konl' declared at (1) [-Wunused-variable] cracklength.f:23:45: & nproc,iinc,acrackglob,ier,nbounnod,nfront) 1 Warning: Unused dummy argument 'nbounnod' at (1) [-Wunused-dummy-argument] cracklength.f:38:52: & node,nktet,nkon,nfield,nfaces,netet,nelem,ne,loopa, 1 Warning: Unused variable 'nelem' declared at (1) [-Wunused-variable] cracklength.f:37:58: & nnfront,jrel,ifrontrel(*),integerglob(*),nterms,nselect, 1 Warning: Unused variable 'nterms' declared at (1) [-Wunused-variable] cracklength.f:45:25: & acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2), 1 Warning: Unused variable 'p' declared at (1) [-Wunused-variable] cracklength.f:45:30: & acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2), 1 Warning: Unused variable 'q' declared at (1) [-Wunused-variable] cracklength.f:45:35: & acrack(*),p(3),q(3),r(3),coords(3),posfront(*),dd,ratio(2), 1 Warning: Unused variable 'r' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c cracklength_smoothing.f cracklength_smoothing.f:21:50: & istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack, 1 Warning: Unused dummy argument 'amin' at (1) [-Wunused-dummy-argument] cracklength_smoothing.f:21:38: & istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack, 1 Warning: Unused dummy argument 'iendcrackfro' at (1) [-Wunused-dummy-argument] cracklength_smoothing.f:21:25: & istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack, 1 Warning: Unused dummy argument 'istartcrackfro' at (1) [-Wunused-dummy-argument] cracklength_smoothing.f:32:18: & nstep,m 1 Warning: Unused variable 'm' declared at (1) [-Wunused-variable] cracklength_smoothing.f:21:64: & istartcrackfro,iendcrackfro,acrack,amin,nfront,ncrack, 1 Warning: Unused dummy argument 'ncrack' at (1) [-Wunused-dummy-argument] cracklength_smoothing.f:22:22: & idist,nstep) 1 Warning: Unused dummy argument 'nstep' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c crackprop.f gfortran -Wall -O2 -c crackpropagations.f crackpropagations.f:23:45: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'coefmpc' at (1) [-Wunused-dummy-argument] crackpropagations.f:22:19: & ithermal,cs,ics,tieset,istartset, 1 Warning: Unused dummy argument 'cs' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:22: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'ialset' at (1) [-Wunused-dummy-argument] crackpropagations.f:25:14: & iaxial,nelcon,nmat,ier,jobnamec,matname) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] crackpropagations.f:22:23: & ithermal,cs,ics,tieset,istartset, 1 Warning: Unused dummy argument 'ics' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:15: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'iendset' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:55: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'iexpl' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:62: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'ikmpc' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:13: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'ilmpc' at (1) [-Wunused-dummy-argument] crackpropagations.f:19:65: subroutine crackpropagations(inpc,textpart,nmethod,iperturb, 1 Warning: Unused dummy argument 'iperturb' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:29: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'ipompc' at (1) [-Wunused-dummy-argument] crackpropagations.f:20:15: & isolver,istep, 1 Warning: Unused dummy argument 'isolver' at (1) [-Wunused-dummy-argument] crackpropagations.f:22:40: & ithermal,cs,ics,tieset,istartset, 1 Warning: Unused dummy argument 'istartset' at (1) [-Wunused-dummy-argument] crackpropagations.f:22:16: & ithermal,cs,ics,tieset,istartset, 1 Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:41: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'labmpc' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:25: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'mcs' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:21: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'mpcfree' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:59: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'nef' at (1) [-Wunused-dummy-argument] crackpropagations.f:25:21: & iaxial,nelcon,nmat,ier,jobnamec,matname) 1 Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:50: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'nmpc' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:56: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'nmpc_' at (1) [-Wunused-dummy-argument] crackpropagations.f:23:37: & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, 1 Warning: Unused dummy argument 'nodempc' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:34: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'nset' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:29: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] crackpropagations.f:42:35: character*20 labmpc(*),solver 1 Warning: Unused variable 'solver' declared at (1) [-Wunused-variable] crackpropagations.f:22:30: & ithermal,cs,ics,tieset,istartset, 1 Warning: Unused dummy argument 'tieset' at (1) [-Wunused-dummy-argument] crackpropagations.f:24:65: & ilmpc,mpcfree,mcs,set,nset,labmpc,ipoinpc,iexpl,nef,ttime, 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] crackpropagations.f:209:0: 71 write(*,*) '*ERROR in openfile: could not open file ',fnfrd(1:i+4) Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c crackrate.f crackrate.f:21:53: & crconloc,ncrconst,xk1,xk2,xk3,nstep,acrack, 1 Warning: Unused dummy argument 'acrack' at (1) [-Wunused-dummy-argument] crackrate.f:23:31: & param,nparam,law,ier,r) 1 Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument] crackrate.f:19:59: subroutine crackrate(nfront,ifrontrel,xkeq,phi,ifront, 1 Warning: Unused dummy argument 'ifront' at (1) [-Wunused-dummy-argument] crackrate.f:23:27: & param,nparam,law,ier,r) 1 Warning: Unused dummy argument 'law' at (1) [-Wunused-dummy-argument] crackrate.f:23:23: & param,nparam,law,ier,r) 1 Warning: Unused dummy argument 'nparam' at (1) [-Wunused-dummy-argument] crackrate.f:23:16: & param,nparam,law,ier,r) 1 Warning: Unused dummy argument 'param' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c crackshape.f crackshape.f:19:42: subroutine crackshape(nnfront,ifront,istartfront,iendfront, 1 Warning: Unused dummy argument 'ifront' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c create_contactdofs.f gfortran -Wall -O2 -c create_t.f gfortran -Wall -O2 -c create_tinv.f gfortran -Wall -O2 -c createbd.f gfortran -Wall -O2 -c createblock_struct.f gfortran -Wall -O2 -c createelemneigh.f gfortran -Wall -O2 -c createfint.f createfint.f:26:0: integer i,j,k,ne,indexe,ipkon(*),nope,node,kon(*),mi(*), Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c createialnk.f gfortran -Wall -O2 -c createinterfacempcs.f gfortran -Wall -O2 -c createinum.f createinum.f:20:46: & nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat, 1 Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument] createinum.f:20:28: & nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat, 1 Warning: Unused dummy argument 'nboun' at (1) [-Wunused-dummy-argument] createinum.f:20:37: & nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat, 1 Warning: Unused dummy argument 'ndirboun' at (1) [-Wunused-dummy-argument] createinum.f:19:70: subroutine createinum(ipkon,inum,kon,lakon,nk,ne,cflag,nelemload, 1 Warning: Unused dummy argument 'nelemload' at (1) [-Wunused-dummy-argument] createinum.f:20:13: & nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat, 1 Warning: Unused dummy argument 'nload' at (1) [-Wunused-dummy-argument] createinum.f:32:43: & nk,i,j,nelemload(2,*),nload,node,nboun,nlayer,nopeexp, 1 Warning: Unused variable 'node' declared at (1) [-Wunused-variable] createinum.f:20:22: & nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat, 1 Warning: Unused dummy argument 'nodeboun' at (1) [-Wunused-dummy-argument] createinum.f:32:0: & nk,i,j,nelemload(2,*),nload,node,nboun,nlayer,nopeexp, Warning: 'nopeexp' may be used uninitialized in this function [-Wmaybe-uninitialized] createinum.f:103:0: do j=1,nope*nlayer Warning: 'nlayer' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c createlocalsys.f createlocalsys.f:22:26: & angle,nstep,ier) 1 Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument] createlocalsys.f:20:29: & co,xt,xn,xa,nfront,ifrontrel,stress,iedno,ibounedg,ieled, 1 Warning: Unused dummy argument 'nfront' at (1) [-Wunused-dummy-argument] createlocalsys.f:20:46: & co,xt,xn,xa,nfront,ifrontrel,stress,iedno,ibounedg,ieled, 1 Warning: Unused dummy argument 'stress' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c createmddof.f gfortran -Wall -O2 -c createmdelem.f createmdelem.f:46:23: & iendset(*),idof,m,ikforc(*),ilforc(*),nforc 1 Warning: Unused variable 'idof' declared at (1) [-Wunused-variable] createmdelem.f:40:19: integer iforc,node,imdnode(*),nmdnode,ikmpc(*), 1 Warning: Unused variable 'iforc' declared at (1) [-Wunused-variable] createmdelem.f:25:26: & ikforc,ilforc) 1 Warning: Unused dummy argument 'ikforc' at (1) [-Wunused-dummy-argument] createmdelem.f:25:33: & ikforc,ilforc) 1 Warning: Unused dummy argument 'ilforc' at (1) [-Wunused-dummy-argument] createmdelem.f:24:60: & ialset,ipkon,kon,istartset,iendset,nforc, 1 Warning: Unused dummy argument 'nforc' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c createnodeneigh.f createnodeneigh.f:28:41: & istartnk(*),ialnk(*),ifree,index,i,j,k,nea,neb,elem, 1 Warning: Unused variable 'index' declared at (1) [-Wunused-variable] createnodeneigh.f:29:0: & ipkon(*),kon(*),indexe,nope,ichecknodes(*),node, Warning: 'nope' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c createtet.f createtet.f:25:39: & ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j, 1 Warning: Unused variable 'ifree' declared at (1) [-Wunused-variable] createtet.f:25:25: & ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j, 1 Warning: Unused variable 'ifreetet' declared at (1) [-Wunused-variable] createtet.f:25:49: & ipofa(*),ifreetet,ifreefa,ifree,ig(3,4),j, 1 Warning: Unused variable 'j' declared at (1) [-Wunused-variable] createtet.f:27:44: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'j1' declared at (1) [-Wunused-variable] createtet.f:27:47: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'j2' declared at (1) [-Wunused-variable] createtet.f:27:50: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'j3' declared at (1) [-Wunused-variable] createtet.f:26:10: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'n1' declared at (1) [-Wunused-variable] createtet.f:26:13: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'n2' declared at (1) [-Wunused-variable] createtet.f:26:16: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'n3' declared at (1) [-Wunused-variable] createtet.f:26:19: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'n4' declared at (1) [-Wunused-variable] createtet.f:28:34: & node,indexold,ielement,ndx,ndy,ndz,iparentelement 1 Warning: Unused variable 'ndx' declared at (1) [-Wunused-variable] createtet.f:28:38: & node,indexold,ielement,ndx,ndy,ndz,iparentelement 1 Warning: Unused variable 'ndy' declared at (1) [-Wunused-variable] createtet.f:28:42: & node,indexold,ielement,ndx,ndy,ndz,iparentelement 1 Warning: Unused variable 'ndz' declared at (1) [-Wunused-variable] createtet.f:27:15: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'nx1' declared at (1) [-Wunused-variable] createtet.f:27:19: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'nx2' declared at (1) [-Wunused-variable] createtet.f:26:23: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nxa' declared at (1) [-Wunused-variable] createtet.f:26:27: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nxb' declared at (1) [-Wunused-variable] createtet.f:26:31: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nxc' declared at (1) [-Wunused-variable] createtet.f:26:35: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nxd' declared at (1) [-Wunused-variable] createtet.f:27:23: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'ny1' declared at (1) [-Wunused-variable] createtet.f:27:27: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'ny2' declared at (1) [-Wunused-variable] createtet.f:26:39: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nya' declared at (1) [-Wunused-variable] createtet.f:26:43: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nyb' declared at (1) [-Wunused-variable] createtet.f:26:47: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nyc' declared at (1) [-Wunused-variable] createtet.f:26:51: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nyd' declared at (1) [-Wunused-variable] createtet.f:27:31: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'nz1' declared at (1) [-Wunused-variable] createtet.f:27:35: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'nz2' declared at (1) [-Wunused-variable] createtet.f:26:55: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nza' declared at (1) [-Wunused-variable] createtet.f:26:59: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nzb' declared at (1) [-Wunused-variable] createtet.f:26:63: & n1,n2,n3,n4,nxa,nxb,nxc,nxd,nya,nyb,nyc,nyd,nza,nzb,nzc, 1 Warning: Unused variable 'nzc' declared at (1) [-Wunused-variable] createtet.f:27:11: & nzd,nx1,nx2,ny1,ny2,nz1,nz2,index,j1,j2,j3,i,n, 1 Warning: Unused variable 'nzd' declared at (1) [-Wunused-variable] createtet.f:78:0: inodfa(4,indexold)=index Warning: 'indexold' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c createtiedsurfs.f gfortran -Wall -O2 -c creep.f creep.f:20:49: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'cmname' at (1) [-Wunused-dummy-argument] creep.f:21:14: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument] creep.f:19:34: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'deswa' at (1) [-Wunused-dummy-argument] creep.f:20:31: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'dpred' at (1) [-Wunused-dummy-argument] creep.f:20:18: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'dtemp' at (1) [-Wunused-dummy-argument] creep.f:19:49: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'ec' at (1) [-Wunused-dummy-argument] creep.f:19:53: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'esw' at (1) [-Wunused-dummy-argument] creep.f:21:52: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument] creep.f:21:41: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'kspt' at (1) [-Wunused-dummy-argument] creep.f:21:47: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument] creep.f:21:36: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'layer' at (1) [-Wunused-dummy-argument] creep.f:20:61: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'lend' at (1) [-Wunused-dummy-argument] creep.f:20:56: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'leximp' at (1) [-Wunused-dummy-argument] creep.f:21:26: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'noel' at (1) [-Wunused-dummy-argument] creep.f:21:30: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'npt' at (1) [-Wunused-dummy-argument] creep.f:21:21: & coords,nstatv,noel,npt,layer,kspt,kstep,kinc) 1 Warning: Unused dummy argument 'nstatv' at (1) [-Wunused-dummy-argument] creep.f:19:55: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] creep.f:20:25: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'predef' at (1) [-Wunused-dummy-argument] creep.f:19:46: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'serd' at (1) [-Wunused-dummy-argument] creep.f:19:41: subroutine creep(decra,deswa,statev,serd,ec,esw,p,qtild, 1 Warning: Unused dummy argument 'statev' at (1) [-Wunused-dummy-argument] creep.f:20:12: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'temp' at (1) [-Wunused-dummy-argument] creep.f:20:36: & temp,dtemp,predef,dpred,time,dtime,cmname,leximp,lend, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c creeps.f gfortran -Wall -O2 -c cross_split.f cross_split.f:22:25: & iaxial,iplausi) 1 Warning: Unused dummy argument 'iplausi' at (1) [-Wunused-dummy-argument] cross_split.f:21:47: & nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time, 1 Warning: Unused dummy argument 'set' at (1) [-Wunused-dummy-argument] cross_split.f:21:66: & nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] cross_split.f:21:61: & nodef,idirf,df,cp,r,physcon,numf,set,mi,ider,ttime,time, 1 Warning: Unused dummy argument 'ttime' at (1) [-Wunused-dummy-argument] cross_split.f:42:0: &tdkp1,A,A1,A2,calc_residual_cross_split,dh1,dh2,alpha,xflow1, Warning: 'a' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cubic.f gfortran -Wall -O2 -c cubtri.f cubtri.f:145:0: IF (ERR.LT.DMAX1(ONE,ABS(ANS))*EPS) GO TO 90 Warning: 'terr' may be used uninitialized in this function [-Wmaybe-uninitialized] cubtri.f:145:0: Warning: 'tans' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c cyclichardenings.f cyclichardenings.f:20:45: & npmat_,plicon,nplicon,ncmat_,elcon,matname, 1 Warning: Unused dummy argument 'elcon' at (1) [-Wunused-dummy-argument] cyclichardenings.f:33:60: & n,key,i,nplicon(0:ntmat_,*),istat,ncmat_,itemp,id, 1 Warning: Unused variable 'id' declared at (1) [-Wunused-variable] cyclichardenings.f:33:57: & n,key,i,nplicon(0:ntmat_,*),istat,ncmat_,itemp,id, 1 Warning: Unused variable 'itemp' declared at (1) [-Wunused-variable] cyclichardenings.f:34:42: & ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl, 1 Warning: Unused variable 'kin' declared at (1) [-Wunused-variable] cyclichardenings.f:20:53: & npmat_,plicon,nplicon,ncmat_,elcon,matname, 1 Warning: Unused dummy argument 'matname' at (1) [-Wunused-dummy-argument] cyclichardenings.f:34:29: & ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl, 1 Warning: Unused variable 'ndata' declared at (1) [-Wunused-variable] cyclichardenings.f:34:38: & ipoinpc(0:*),ndata,ndatamax,kin,irstrt(*),iline,ipol,inl, 1 Warning: Unused variable 'ndatamax' declared at (1) [-Wunused-variable] cyclichardenings.f:38:49: & elcon(0:ncmat_,ntmat_,*),plconloc(802),t1l 1 Warning: Unused variable 'plconloc' declared at (1) [-Wunused-variable] cyclichardenings.f:38:53: & elcon(0:ncmat_,ntmat_,*),plconloc(802),t1l 1 Warning: Unused variable 't1l' declared at (1) [-Wunused-variable] gfortran -Wall -O2 -c cyclicsymmetrymodels.f cyclicsymmetrymodels.f:27:58: & trab,ntrans,ntrans_,jobnamec,vold,nef,mi,iaxial,ier) 1 Warning: Unused dummy argument 'iaxial' at (1) [-Wunused-dummy-argument] cyclicsymmetrymodels.f:22:29: & coefmpc,nmpc,nmpc_,ikmpc,ilmpc,mpcfree,rcs,zcs,ics,nr,nz, 1 Warning: Unused dummy argument 'nmpc_' at (1) [-Wunused-dummy-argument] cyclicsymmetrymodels.f:844:0: y1=x3*z2-x2*z3 Warning: 'z2' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:845:0: z1=x2*y3-x3*y2 Warning: 'y2' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:848:0: & dacos(x2*x3+y2*y3+z2*z3) Warning: 'x2' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:72:0: & nodempc(3,*),itiecyc,ntiecyc,iaxial,nopes,nelems,m,indexe, Warning: 'nopes' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:681:0: noded=kon(indexe+ifaceq(m,jfaces)) Warning: 'indexe' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:78:0: & ifacetet(*),inodface(*),ipoinpc(0:*),maxsectors,id,jfaces, Warning: 'jfaces' may be used uninitialized in this function [-Wmaybe-uninitialized] cyclicsymmetrymodels.f:72:0: & nodempc(3,*),itiecyc,ntiecyc,iaxial,nopes,nelems,m,indexe, Warning: 'nelems' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c dampings.f gfortran -Wall -O2 -c dashdamp.f dashdamp.f:19:33: subroutine dashdamp(xl,konl,voldl,s,imat,elcon,nelcon, 1 Warning: Unused dummy argument 'konl' at (1) [-Wunused-dummy-argument] dashdamp.f:20:33: & ncmat_,ntmat_,nope,lakonl,t0l,t1l,kode,elconloc,plicon, 1 Warning: Unused dummy argument 'lakonl' at (1) [-Wunused-dummy-argument] dashdamp.f:20:37: & ncmat_,ntmat_,nope,lakonl,t0l,t1l,kode,elconloc,plicon, 1 Warning: Unused dummy argument 't0l' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c dashpots.f dashpots.f:214:0: elset(ipos:ipos)=' ' Warning: 'ipos' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c dattime.f gfortran -Wall -O2 -c ddeabm.f ddeabm.f:2086:22: INTEGER DIVER(4) 1 Warning: Unused variable 'diver' declared at (1) [-Wunused-variable] ddeabm.f:2084:22: INTEGER LARGE(4) 1 Warning: Unused variable 'large' declared at (1) [-Wunused-variable] ddeabm.f:2087:22: INTEGER LOG10(4) 1 Warning: Unused variable 'log10' declared at (1) [-Wunused-variable] ddeabm.f:2085:22: INTEGER RIGHT(4) 1 Warning: Unused variable 'right' declared at (1) [-Wunused-variable] ddeabm.f:2083:22: INTEGER SMALL(4) 1 Warning: Unused variable 'small' declared at (1) [-Wunused-variable] ddeabm.f:4601:30: SUBROUTINE XERHLT (MESSG) 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:67: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'kontrl' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:59: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'level' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:31: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'librar' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:46: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:52: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument] ddeabm.f:4541:39: SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) 1 Warning: Unused dummy argument 'subrou' at (1) [-Wunused-dummy-argument] ddeabm.f:1206:0: GDI = 1.0D0/TEMP1 Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized] ddeabm.f:4082:0: WRITE (UNIT = OUTPUT, FMT = 9000) Warning: 'output' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c ddebdf.f ddebdf.f:2626:39: SUBROUTINE DSLVS (WM, IWM, X, TEM) 1 Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument] ddebdf.f:2399:27: SUBROUTINE DPJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, DF, 1 Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument] ddebdf.f:1912:0: IF (M .GE. 2 .AND. DEL .GT. 2.0D0*DELP) Warning: 'delp' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c deformationplasticitys.f gfortran -Wall -O2 -c defplas.f defplas.f:20:15: & beta,stre,ckl,vj,xstate,nstate_,iel,iint,mi) 1 Warning: Unused dummy argument 'beta' at (1) [-Wunused-dummy-argument] defplas.f:19:52: subroutine defplas(elconloc,elas,emec,ithermal,icmd, 1 Warning: Unused dummy argument 'ithermal' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c delaun.f gfortran -Wall -O2 -c deltri.f gfortran -Wall -O2 -c densitys.f gfortran -Wall -O2 -c depvars.f depvars.f:21:20: & ncocon,ipoinpc,ier) 1 Warning: Unused dummy argument 'ncocon' at (1) [-Wunused-dummy-argument] depvars.f:19:45: subroutine depvars(inpc,textpart,nelcon,nmat, 1 Warning: Unused dummy argument 'nelcon' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c designresponses.f gfortran -Wall -O2 -c designvariabless.f designvariabless.f:19:61: subroutine designvariabless(inpc,textpart,tieset,tietol,istep, 1 Warning: Unused dummy argument 'tietol' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c desiperelem.f gfortran -Wall -O2 -c detectactivecont.f gfortran -Wall -O2 -c determineextern.f gfortran -Wall -O2 -c dflux.f dflux.f:20:41: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'area' at (1) [-Wunused-dummy-argument] dflux.f:20:49: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'co' at (1) [-Wunused-dummy-argument] dflux.f:21:33: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'coefmpc' at (1) [-Wunused-dummy-argument] dflux.f:19:63: subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords, 1 Warning: Unused dummy argument 'coords' at (1) [-Wunused-dummy-argument] dflux.f:113:68: integer kstep,kinc,noel,npt,jltyp,konl(20),ipompc(*),nstate_,i, 1 Warning: Unused variable 'i' declared at (1) [-Wunused-variable] dflux.f:114:56: & nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*) 1 Warning: Unused variable 'id' declared at (1) [-Wunused-variable] dflux.f:114:53: & nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*) 1 Warning: Unused variable 'idof' declared at (1) [-Wunused-variable] dflux.f:21:44: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'ikmpc' at (1) [-Wunused-dummy-argument] dflux.f:21:50: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'ilmpc' at (1) [-Wunused-dummy-argument] dflux.f:21:17: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'ipompc' at (1) [-Wunused-dummy-argument] dflux.f:21:57: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'iscale' at (1) [-Wunused-dummy-argument] dflux.f:20:16: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'jltyp' at (1) [-Wunused-dummy-argument] dflux.f:19:42: subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords, 1 Warning: Unused dummy argument 'kinc' at (1) [-Wunused-dummy-argument] dflux.f:20:61: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'konl' at (1) [-Wunused-dummy-argument] dflux.f:19:37: subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords, 1 Warning: Unused dummy argument 'kstep' at (1) [-Wunused-dummy-argument] dflux.f:20:56: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'lakonl' at (1) [-Wunused-dummy-argument] dflux.f:20:36: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'loadtype' at (1) [-Wunused-dummy-argument] dflux.f:21:38: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'nmpc' at (1) [-Wunused-dummy-argument] dflux.f:114:48: & nodempc(3,*),nmpc,ikmpc(*),ilmpc(*),node,idof,id,iscale,mi(*) 1 Warning: Unused variable 'node' declared at (1) [-Wunused-variable] dflux.f:21:25: & ipompc,nodempc,coefmpc,nmpc,ikmpc,ilmpc,iscale,mi, 1 Warning: Unused dummy argument 'nodempc' at (1) [-Wunused-dummy-argument] dflux.f:20:27: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'press' at (1) [-Wunused-dummy-argument] dflux.f:19:31: subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords, 1 Warning: Unused dummy argument 'sol' at (1) [-Wunused-dummy-argument] dflux.f:20:21: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'temp' at (1) [-Wunused-dummy-argument] dflux.f:19:47: subroutine dflux(flux,sol,kstep,kinc,time,noel,npt,coords, 1 Warning: Unused dummy argument 'time' at (1) [-Wunused-dummy-argument] dflux.f:20:46: & jltyp,temp,press,loadtype,area,vold,co,lakonl,konl, 1 Warning: Unused dummy argument 'vold' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c dfluxs.f dfluxs.f:21:17: & ielmat,ntmat_,iamload, 1 Warning: Unused dummy argument 'ielmat' at (1) [-Wunused-dummy-argument] dfluxs.f:21:24: & ielmat,ntmat_,iamload, 1 Warning: Unused dummy argument 'ntmat_' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c dgesv.f dgesv.f:878:69: INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3, 1 Warning: Unused dummy argument 'n3' at (1) [-Wunused-dummy-argument] dgesv.f:878:57: INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3, 1 Warning: Unused dummy argument 'opts' at (1) [-Wunused-dummy-argument] gfortran -Wall -O2 -c dgmres1.f dgmres1.f:998:36: INTEGER FUNCTION ISDGMR1 (N, B, X, XL, NELT, IA, JA, A, ISYM, 1 Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument] dgmres1.f:999:31: + NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] dgmres1.f:1000:37: + RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL, 1 Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument] dgmres1.f:999:55: + NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] dgmres1.f:11:25: + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW, 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] dgmres1.f:940:0: IF (RHO .LT. R0NRM) GO TO 150 Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] gfortran -Wall -O2 -c dgmres.f dgmres.f:644:72: 10 ASSIGN 30 TO NEXT 1 Warning: Deleted feature: ASSIGN statement at (1) dgmres.f:651:19: 20 GO TO NEXT,(30, 50, 70, 110) 1 Warning: Deleted feature: Assigned GOTO statement at (1) dgmres.f:653:72: ASSIGN 50 TO NEXT 1 Warning: Deleted feature: ASSIGN statement at (1) dgmres.f:663:72: ASSIGN 70 TO NEXT 1 Warning: Deleted feature: ASSIGN statement at (1) dgmres.f:669:72: ASSIGN 110 TO NEXT 1 Warning: Deleted feature: ASSIGN statement at (1) dgmres.f:1276:9: use omp_lib 1 Fatal Error: Can't open module file 'omp_lib.mod' for reading at (1): No such file or directory compilation terminated. *** Error 1 in /usr/ports/pobj/calculix-ccx-2.22/CalculiX/ccx_2.22/src (Makefile:11 'dgmres.o') *** Error 2 in . (/usr/ports/infrastructure/mk/bsd.port.mk:3061 '/usr/ports/pobj/calculix-ccx-2.22/.build_done') *** Error 2 in /usr/ports/mystuff/cad/calculix/ccx (/usr/ports/infrastructure/mk/bsd.port.mk:2704 'build')