[Ad-dev] [openAD] #210: shape matching fails
OpenAD
trac at mcs.anl.gov
Wed Mar 31 19:38:25 CDT 2010
#210: shape matching fails
-------------------------+--------------------------------------------------
Reporter: lyonsam | Owner: utke
Type: defect | Status: new
Priority: major | Milestone: scale1
Component: xaifBooster | Keywords:
-------------------------+--------------------------------------------------
there are a number of places in SCALE where shape matching for array
temporaries fails:
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(152):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_70]
OpenAD_dly_70 = (PXJ(:,:,IZ)%v/XT(IZ))
----^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(155):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_347,PXJ(:,:,IZ))
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(165):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1089]
OpenAD_lin_1089 = (PXJ(IGPT+2,:,:)%v-PXJ(IGPT,:,:)%v)
----^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(168):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_348,PXJ(IGPT,:,:))
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(169):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_349,PXJ(IGPT+2,:,:))
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(170):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_350,PXJ(IGPT,:,:))
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepout_I.f90(174):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAXPY]
CALL saxpy(OpenAD_lin_1091,OpenAD_prp_351,PXJ(IGPT+1,:,:))
---------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(291):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_998]
OpenAD_lin_998 = PXND(:,:)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(294):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1000]
OpenAD_lin_1000 = PXB(:)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(296):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_299,XND(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(303):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAXPY]
CALL saxpy(OpenAD_lin_998,CON,XND(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(319):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1002]
OpenAD_lin_1002 = XNA(:IM,:)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(320):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_301,XJ(:IM,:,IIG))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(321):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(XJ(:IM,:,IIG),OpenAD_prp_301)
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(322):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAXPY]
CALL saxpy(OpenAD_lin_1001,XNA(:IM,:),XJ(:IM,:,IIG))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/mgsum_I.f90(323):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAXPY]
CALL saxpy(OpenAD_lin_1002,CON,XJ(:IM,:,IIG))
-------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90(256):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_868]
OpenAD_lin_868 = XNN(:)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90(257):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_869]
OpenAD_lin_869 = CS(:)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90(457):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_256,XNR(:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90(1055):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_916]
OpenAD_lin_916 = PNC(M,:)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/inner_I.f90(1056):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_268,XNA(I,:))
-------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(142):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_71]
OpenAD_dly_71 = (SRMG(:)%v/DELTG)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(148):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_354,SRMG(:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(191):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_75]
OpenAD_dly_75 = (SAMG(:,:)%v/DEP1H)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(194):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_365,SAMG(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(222):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_74]
OpenAD_dly_74 = (SAMG(:,:)%v/DEP1H)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(225):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_357,SAMG(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(226):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAX]
CALL sax(OpenAD_lin_1109,PXJT(:,:JT,1),XJ(:,:JT,IIG))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(233):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_358,AT(:,2))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(236):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_359,AT(:,18))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(239):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_360,AT(:,30))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(242):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_361,AT(:,13))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(245):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_362,AT(:,28))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(247):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1113]
OpenAD_lin_1113 = (PXN(:,1)%v*DELT%v)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(250):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1116]
OpenAD_lin_1116 = PXN(:,1)%v
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(256):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_363,AT(:,13))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(257):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_364,AT(:,28))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/prepxc_I.f90(259):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [DEC_DERIV]
CALL dec_deriv(AT(:,25),OpenAD_prp_364)
-------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/firstp_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/firstp_I.f90(208):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1280]
OpenAD_lin_1280 = XND(I,:)%v
----^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/firstp_I.f90(214):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1282]
OpenAD_lin_1282 = XND(IP,:)%v
--^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(106):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_78]
OpenAD_dly_78 = (THSRP(I,:)%v*RNORM%v)
------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(108):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1386]
OpenAD_lin_1386 = THSRP(I,:)%v
------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(110):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_DLY_79]
OpenAD_dly_79 = (THSAP(I,:,:)%v*RNORM%v)
------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(112):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1388]
OpenAD_lin_1388 = THSAP(I,:,:)%v
------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(114):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_409,THSRP(I,:))
-----------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(115):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_410,THSAP(I,:,:))
-----------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(119):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SAXPY]
CALL saxpy(OpenAD_lin_1388,RNORM,THSAP(I,:,:))
-----------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(139):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_414,SA(:IM,:))
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(141):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [INC_DERIV]
CALL inc_deriv(SA(:IM,:),OpenAD_prp_414)
---------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(160):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_418,SA(:IM,:))
-----------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/thermit_I.f90(161):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(SA(:IM,:),OpenAD_prp_418)
-----------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pw_chi_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pw_chi_I.f90(54):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1552]
OpenAD_lin_1552 = TMP_CHI(:)
------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pw_chi_I.f90(55):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_453,POINT_CHI(:,ISPEC))
-----------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/calc_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/calc_I.f90(1685):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_504,XNA(:IM,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/calc_I.f90(1686):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(FLK(2:JT+1,:IM),OpenAD_prp_504)
-------^
}}}
{{{
ifort -std95 -us -lowercase -traceback -free -O0 -g -debug all -traceback
-mieee-fp -I
/sandbox/lyonsam/hgBranch/vecOp_Scale/Scale/scale6-new/build/mods/OAD.pre.xb.x2w.w2f.post/scalelib
-c ../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(1630):
warning #8089: Parentheses around an I/O list is an extension to Standard
F95.
& ra'//'tio=", es8.2)') EP,NZAP(NUCP),(SIG_COH/PXSS(MATP,N))
---------------------------------------------------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2028):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_499,REMVL(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2035):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1847]
OpenAD_lin_1847 = (DU(NPTH+1)*PDDXS(:,1,:,1)%v)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2039):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_500,REMVL(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2042):
error #6366: The shapes of the array expressions do not conform.
[OPENAD_LIN_1851]
OpenAD_lin_1851 = (DU(NBLOW+NPTH+(-1))*PDDXS(:,1,:,NBLOW)%v)
--^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2046):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_501,REMVL(:,:))
-------^
../../../../src/mods/OAD.pre.xb.x2w.w2f.post/centrm/pxsset_I.f90(2065):
error #6285: There is no matching specific subroutine for this generic
subroutine call. [SETDERIV]
CALL setderiv(OpenAD_prp_502,REMVL(:,:))
-------^
}}}
--
Ticket URL: <https://trac.mcs.anl.gov/projects/openAD/ticket/210>
OpenAD <http://www.mcs.anl.gov/openad>
Bug tracking for OpenAD components
More information about the Ad-dev
mailing list