https://community.intel.com/t5/Intel-Fortran-Compiler/Declare-constant-function-arguments-with-specific-data-type/m-p/888135#M77409 Hello,<BR /><BR />I have a function with the following interface:<BR /><BR /> <PRE>[plain]integer(4), parameter :: real_kind = 8<BR />subroutine SetZWidS( linkIndex, segmentIndex, value ) integer(4), intent(in) :: linkIndex, segmentIndex real(real_kind), intent(in) :: value ... end subroutine [/plain]</PRE> <BR /> If I want to pass 1.0E30 for value, e.g. <BR /> <PRE>[cpp]call SetZWidS(link, segement, 1.0E30),[/cpp]</PRE> <BR />I get an error that data types are inconsistent. <BR />Is there a way to declare the 1.0E30 as double without using dble or real(val, 8)?<BR />If so, does that work for other numeric data types as well?<BR /><BR />Thanks in advance<BR />FObermaier<BR /> Wed, 11 Nov 2009 09:26:37 GMT fobermaier 2009-11-11T09:26:37Z https://community.intel.com/t5/Intel-Fortran-Compiler/Declare-constant-function-arguments-with-specific-data-type/m-p/888135#M77409 Hello,<BR /><BR />I have a function with the following interface:<BR /><BR /> <PRE>[plain]integer(4), parameter :: real_kind = 8<BR />subroutine SetZWidS( linkIndex, segmentIndex, value ) integer(4), intent(in) :: linkIndex, segmentIndex real(real_kind), intent(in) :: value ... end subroutine [/plain]</PRE> <BR /> If I want to pass 1.0E30 for value, e.g. <BR /> <PRE>[cpp]call SetZWidS(link, segement, 1.0E30),[/cpp]</PRE> <BR />I get an error that data types are inconsistent. <BR />Is there a way to declare the 1.0E30 as double without using dble or real(val, 8)?<BR />If so, does that work for other numeric data types as well?<BR /><BR />Thanks in advance<BR />FObermaier<BR /> Wed, 11 Nov 2009 09:26:37 GMT https://community.intel.com/t5/Intel-Fortran-Compiler/Declare-constant-function-arguments-with-specific-data-type/m-p/888135#M77409 fobermaier 2009-11-11T09:26:37Z https://community.intel.com/t5/Intel-Fortran-Compiler/Declare-constant-function-arguments-with-specific-data-type/m-p/888136#M77410 <DIV style="margin:0px;"></DIV> <BR />You could use 1.0e30_8 or 1.0e30_real_kind if real_kind is visible in the calling routine (advisable)<BR /><BR />Les Wed, 11 Nov 2009 11:16:51 GMT https://community.intel.com/t5/Intel-Fortran-Compiler/Declare-constant-function-arguments-with-specific-data-type/m-p/888136#M77410 Les_Neilson 2009-11-11T11:16:51Z