Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
28446 Discussions

WRFDA intel Version 15.0.0.090 compile error

Javier_M_2
Beginner
840 Views

Hello,


I am trying to compile WRFDA 3.7.1 http://www2.mmm.ucar.edu/wrf/users/download/get_sources.html#WRFDA and it is failing. In other forums it states that this problem occurs apart from that of version 14.0.3 of intel fortran compilers and is believed to be a bug. Has anyone compiled the WRFDA successfully with intel 15 version? I put a part of the log

thanks in advance.

#################################################################

Intel(R) Fortran Intel(R) 64 Compiler XE for applications running on Intel(R) 64, Version 15.0.0.090 Build 20140723
Copyright (C) 1985-2014 Intel Corporation.  All rights reserved.

ar: creating libesmf_time.a
ar: creating ./libio_grib_share.a
ar: creating ../libio_grib1.a
0.09user 0.00system 0:00.15elapsed 64%CPU (0avgtext+0avgdata 102224maxresident)k
0inputs+160outputs (0major+20132minor)pagefaults 0swaps
0.54user 0.03system 0:00.63elapsed 91%CPU (0avgtext+0avgdata 123408maxresident)k
0inputs+400outputs (0major+22113minor)pagefaults 0swaps
0.45user 0.03system 0:00.54elapsed 88%CPU (0avgtext+0avgdata 116112maxresident)k
0inputs+488outputs (0major+22073minor)pagefaults 0swaps
0.90user 0.04system 0:01.00elapsed 94%CPU (0avgtext+0avgdata 148544maxresident)k
0inputs+712outputs (0major+24147minor)pagefaults 0swaps
ar: creating libwrfio_int.a
0.10user 0.04system 0:00.22elapsed 70%CPU (0avgtext+0avgdata 89888maxresident)k
0inputs+1720outputs (0major+32335minor)pagefaults 0swaps

real    0m0.500s
user    0m0.412s
sys    0m0.036s
ar: creating libfftpack.a
1.83user 0.03system 0:01.93elapsed 96%CPU (0avgtext+0avgdata 153328maxresident)k
0inputs+536outputs (0major+25699minor)pagefaults 0swaps
0.32user 0.00system 0:00.37elapsed 88%CPU (0avgtext+0avgdata 148320maxresident)k
0inputs+328outputs (0major+24479minor)pagefaults 0swaps
CRTM_MW_Water_SfcOptics.f90(87): error #6401: The attributes of this name conflict with those made accessible by a USE statement.   [IVAR_TYPE]
  END TYPE iVar_type
-----------^
CRTM_MW_Water_SfcOptics.f90(87): error #6148: The name on this END TYPE statement is different from the name on the corresponding derived type statement.   [IVAR_TYPE]
  END TYPE iVar_type
-----------^
CRTM_MW_Water_SfcOptics.f90(196): error #6401: The attributes of this name conflict with those made accessible by a USE statement.   [IVAR_TYPE]
    TYPE(iVar_type),              INTENT(IN OUT) :: iVar
---------^
CRTM_MW_Water_SfcOptics.f90(401): error #6401: The attributes of this name conflict with those made accessible by a USE statement.   [IVAR_TYPE]
    TYPE(iVar_type),              INTENT(IN)     :: iVar
---------^
CRTM_MW_Water_SfcOptics.f90(599): error #6401: The attributes of this name conflict with those made accessible by a USE statement.   [IVAR_TYPE]
    TYPE(iVar_type),              INTENT(IN)     :: iVar
---------^
CRTM_MW_Water_SfcOptics.f90(232): error #6404: This name does not have a type, and must have an explicit type.   [IVAR]
               iVar%FastemX_Var                       , &  ! Internal variable output
---------------^
CRTM_MW_Water_SfcOptics.f90(232): error #6460: This is not a field name that is defined in the encompassing structure.   [FASTEMX_VAR]
               iVar%FastemX_Var                       , &  ! Internal variable output
--------------------^
CRTM_MW_Water_SfcOptics.f90(255): error #6460: This is not a field name that is defined in the encompassing structure.   [LF_MWSSEM_VAR]
                 iVar%LF_MWSSEM_Var         )  ! Internal variable output
----------------------^
CRTM_MW_Water_SfcOptics.f90(267): error #6460: This is not a field name that is defined in the encompassing structure.   [DEH_DWINDSPEED]
                        iVar%dEH_dWindSpeed(i)   , & ! Output
-----------------------------^
CRTM_MW_Water_SfcOptics.f90(268): error #6460: This is not a field name that is defined in the encompassing structure.   [DEV_DWINDSPEED]
                        iVar%dEV_dWindSpeed(i)     ) ! Output
-----------------------------^
CRTM_MW_Water_SfcOptics.f90(267): error #6638: An actual argument is an expression or constant; this is not valid since the associated dummy argument has the explicit INTENT(OUT) or INTENT(INOUT) attribute.   [IVAR]
                        iVar%dEH_dWindSpeed(i)   , & ! Output
------------------------^
CRTM_MW_Water_SfcOptics.f90(268): error #6638: An actual argument is an expression or constant; this is not valid since the associated dummy argument has the explicit INTENT(OUT) or INTENT(INOUT) attribute.   [IVAR]
                        iVar%dEV_dWindSpeed(i)     ) ! Output
------------------------^
CRTM_MW_Water_SfcOptics.f90(434): error #6404: This name does not have a type, and must have an explicit type.   [IVAR]
               iVar%FastemX_Var                            , &  ! Internal variable input
---------------^
CRTM_MW_Water_SfcOptics.f90(462): error #6460: This is not a field name that is defined in the encompassing structure.   [DEH_DTS]
          SfcOptics_TL%Emissivity(i,2) = (iVar%dEH_dTs(i)*Surface_TL%Water_Temperature) + &
-----------------------------------------------^
CRTM_MW_Water_SfcOptics.f90(464): error #6460: This is not a field name that is defined in the encompassing structure.   [DEV_DTS]
          SfcOptics_TL%Emissivity(i,1) = (iVar%dEV_dTs(i)*Surface_TL%Water_Temperature) + &
-----------------------------------------------^
CRTM_MW_Water_SfcOptics.f90(635): error #6404: This name does not have a type, and must have an explicit type.   [IVAR]
               iVar%FastemX_Var                             , &  ! Internal variable input
---------------^
compilation aborted for CRTM_MW_Water_SfcOptics.f90 (code 1)
make[3]: [CRTM_MW_Water_SfcOptics.o] Error 1 (no tiene efecto)
CRTM_SfcOptics.f90(54): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_MW_WATER_SFCOPTICS]
  USE CRTM_MW_Water_SfcOptics,  ONLY: MWWSOVar_type => iVar_type   , &
------^
CRTM_SfcOptics.f90(135): error #6498: The use-name for this local-name is not defined.   [MWWSOVAR_TYPE]
    TYPE(MWWSOVar_type)  :: MWWSOV ! Water
---------^
CRTM_SfcOptics.f90(55): error #6580: Name in only-list does not exist.   [COMPUTE_MW_WATER_SFCOPTICS]
                                      Compute_MW_Water_SfcOptics   , &
--------------------------------------^
CRTM_SfcOptics.f90(56): error #6580: Name in only-list does not exist.   [COMPUTE_MW_WATER_SFCOPTICS_TL]
                                      Compute_MW_Water_SfcOptics_TL, &
--------------------------------------^
CRTM_SfcOptics.f90(57): error #6580: Name in only-list does not exist.   [COMPUTE_MW_WATER_SFCOPTICS_AD]
                                      Compute_MW_Water_SfcOptics_AD
--------------------------------------^
CRTM_SfcOptics.f90(534): error #6460: This is not a field name that is defined in the encompassing structure.   [MWWSOV]
                           iVar%MWWSOV   )  ! Internal variable output
--------------------------------^
CRTM_SfcOptics.f90(528): error #6404: This name does not have a type, and must have an explicit type.   [COMPUTE_MW_WATER_SFCOPTICS]
          Error_Status = Compute_MW_Water_SfcOptics( &
-------------------------^
CRTM_SfcOptics.f90(1256): error #6404: This name does not have a type, and must have an explicit type.   [COMPUTE_MW_WATER_SFCOPTICS_TL]
          Error_Status = Compute_MW_Water_SfcOptics_TL( &
-------------------------^
CRTM_SfcOptics.f90(2031): error #6404: This name does not have a type, and must have an explicit type.   [COMPUTE_MW_WATER_SFCOPTICS_AD]
          Error_Status = Compute_MW_Water_SfcOptics_AD( &
-------------------------^
compilation aborted for CRTM_SfcOptics.f90 (code 1)
make[3]: [CRTM_SfcOptics.o] Error 1 (no tiene efecto)
RTV_Define.f90(37): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics,        ONLY: SOVar_type => iVar_type
------^
RTV_Define.f90(258): error #6498: The use-name for this local-name is not defined.   [SOVAR_TYPE]
    TYPE(SOVar_type) :: SOV
---------^
compilation aborted for RTV_Define.f90 (code 1)
make[3]: [RTV_Define.o] Error 1 (no tiene efecto)
SOI_Module.f90(28): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define     , ONLY: RTV_type, &
------^
SOI_Module.f90(93): error #6406: Conflicting attributes or multiple declaration of name.   [RTV_TYPE]
      TYPE(RTV_type), INTENT( INOUT ) :: RTV
-----------^
SOI_Module.f90(323): error #6406: Conflicting attributes or multiple declaration of name.   [RTV_TYPE]
      TYPE(RTV_type), INTENT( IN ) :: RTV
-----------^
SOI_Module.f90(337): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles ) :: source_TL
---------------------------^
SOI_Module.f90(338): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles, n_Layers ) :: e_Trans_TL
---------------------------^
SOI_Module.f90(339): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles, n_Layers ) :: s_source_up_TL, s_source_down_TL
^
SOI_Module.f90(340): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles, RTV%n_Angles, n_Layers ) :: s_trans_TL, s_refl_TL
^
SOI_Module.f90(341): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles, 0:n_Layers, RTV%Number_SOI_Iter ) :: s_IterRad_UP_TL, s_IterRad_DOWN_TL
^
SOI_Module.f90(510): error #6406: Conflicting attributes or multiple declaration of name.   [RTV_TYPE]
      TYPE(RTV_type), INTENT(IN) :: RTV
-----------^
SOI_Module.f90(524): error #6158: The structure-name is invalid or is missing.
      REAL(fp), DIMENSION( RTV%n_Angles, 0:n_Layers, RTV%Number_SOI_Iter ) :: s_IterRad_UP_AD      
---------------------------^
SOI_Module.f90(1519): catastrophic error: Too many errors, exiting
compilation aborted for SOI_Module.f90 (code 1)
make[3]: [SOI_Module.o] Error 1 (no tiene efecto)
ADA_Module.f90(20): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define
------^
ADA_Module.f90(77): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type), INTENT( INOUT ) :: RTV
---------^
ADA_Module.f90(88): error #6158: The structure-name is invalid or is missing.
    REAL (fp), DIMENSION(RTV%n_Angles, RTV%n_Angles) :: temporal_matrix
-------------------------^
ADA_Module.f90(88): error #6158: The structure-name is invalid or is missing.
    REAL (fp), DIMENSION(RTV%n_Angles, RTV%n_Angles) :: temporal_matrix
---------------------------------------^
ADA_Module.f90(89): error #6158: The structure-name is invalid or is missing.
    REAL (fp), DIMENSION( RTV%n_Angles, n_Layers) :: refl_down 
--------------------------^
ADA_Module.f90(240): error #6457: This derived type name has not been declared.   [RTV_TYPE]
   TYPE(RTV_type), INTENT( INOUT ) :: RTV
--------^
ADA_Module.f90(489): error #6457: This derived type name has not been declared.   [RTV_TYPE]
      TYPE(RTV_type), INTENT(IN) :: RTV
-----------^
ADA_Module.f90(507): error #6158: The structure-name is invalid or is missing.
      REAL (fp), DIMENSION(RTV%n_Angles,RTV%n_Angles) :: temporal_matrix_TL
---------------------------^
ADA_Module.f90(507): error #6158: The structure-name is invalid or is missing.
      REAL (fp), DIMENSION(RTV%n_Angles,RTV%n_Angles) :: temporal_matrix_TL
----------------------------------------^
ADA_Module.f90(509): error #6158: The structure-name is invalid or is missing.
      REAL (fp), DIMENSION( RTV%n_Angles, n_Layers) :: refl_down 
----------------------------^
ADA_Module.f90(510): error #6158: The structure-name is invalid or is missing.
      REAL (fp), DIMENSION( RTV%n_Angles ) :: s_source_up_TL,s_source_down_TL,refl_down_TL
^
ADA_Module.f90(512): error #6158: The structure-name is invalid or is missing.
      REAL (fp), DIMENSION( RTV%n_Angles, RTV%n_Angles ) :: s_trans_TL,s_refl_TL,Refl_Trans_TL 
^
ADA_Module.f90(1537): catastrophic error: Too many errors, exiting
compilation aborted for ADA_Module.f90 (code 1)
make[3]: [ADA_Module.o] Error 1 (no tiene efecto)
Emission_Module.f90(20): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define
------^
Emission_Module.f90(100): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),              INTENT(IN OUT) :: RTV
---------^
Emission_Module.f90(209): error #6457: This derived type name has not been declared.   [RTV_TYPE]
      TYPE(RTV_type), INTENT( IN) :: RTV
-----------^
Emission_Module.f90(316): error #6457: This derived type name has not been declared.   [RTV_TYPE]
      TYPE(RTV_type), INTENT( IN) :: RTV
-----------^
Emission_Module.f90(110): error #6404: This name does not have a type, and must have an explicit type.   [RTV]
      RTV%Secant_Down_Angle = SECANT_DIFFUSIVITY 
------^
Emission_Module.f90(110): error #6460: This is not a field name that is defined in the encompassing structure.   [SECANT_DOWN_ANGLE]
      RTV%Secant_Down_Angle = SECANT_DIFFUSIVITY 
----------^
Emission_Module.f90(116): error #6460: This is not a field name that is defined in the encompassing structure.   [E_LEVEL_RAD_DOWN]
    RTV%e_Level_Rad_DOWN(0) = cosmic_background 
--------^
Emission_Module.f90(117): error #6460: This is not a field name that is defined in the encompassing structure.   [TOTAL_OD]
    RTV%Total_OD = ZERO
--------^
Emission_Module.f90(124): error #6460: This is not a field name that is defined in the encompassing structure.   [E_LAYER_TRANS_DOWN]
      RTV%e_Layer_Trans_DOWN(k) = EXP(-T_OD(k)*RTV%Secant_Down_Angle)
----------^
Emission_Module.f90(134): error #6460: This is not a field name that is defined in the encompassing structure.   [E_LEVEL_RAD_UP]
    RTV%e_Level_Rad_UP(n_Layers) = (emissivity(n_Angles)*Planck_Surface) + &
--------^
Emission_Module.f90(138): error #6460: This is not a field name that is defined in the encompassing structure.   [DOWN_SOLAR_RADIANCE]
    RTV%Down_Solar_Radiance = ZERO
--------^
Emission_Module.f90(152): error #6460: This is not a field name that is defined in the encompassing structure.   [UP_RADIANCE]
    RTV%Up_Radiance = ZERO
--------^
Emission_Module.f90(153): error #6460: This is not a field name that is defined in the encompassing structure.   [OVERCAST]
    RTV%Overcast    = ZERO
--------^
Emission_Module.f90(158): error #6460: This is not a field name that is defined in the encompassing structure.   [E_LAYER_TRANS_UP]
      RTV%e_Layer_Trans_UP(k) = EXP(-T_OD(k)/u)
----------^
Emission_Module.f90(167): error #6514: A substring must be of type CHARACTER.   [OVERCAST]
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
----------^
Emission_Module.f90(167): error #6514: A substring must be of type CHARACTER.   [OVERCAST]
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
--------------------------------------^
Emission_Module.f90(167): error #6355: This binary operation is invalid for this data type.   [OVERCAST]
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
--------------------------------------^
Emission_Module.f90(167): error #6549: An arithmetic or LOGICAL type is required in this context.
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
----------------------------------------------------------^
Emission_Module.f90(167): error #6355: This binary operation is invalid for this data type.
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
----------------------------------------------------------^
Emission_Module.f90(167): error #6549: An arithmetic or LOGICAL type is required in this context.
      RTV%Overcast(k:n_Layers) = (RTV%Overcast(k:n_Layers)*RTV%e_Layer_Trans_UP(k)) + layer_source_up
------------------------------------------------------------------------------------^
Emission_Module.f90(223): error #6404: This name does not have a type, and must have an explicit type.   [RTV]
      Total_OD = RTV%Total_OD
-----------------^
Emission_Module.f90(333): error #6404: This name does not have a type, and must have an explicit type.   [RTV]
      Total_OD = RTV%Total_OD 
-----------------^
compilation aborted for Emission_Module.f90 (code 1)
make[3]: [Emission_Module.o] Error 1 (no tiene efecto)
Common_RTSolution.f90(35): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define
------^
Common_RTSolution.f90(36): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics
------^
Common_RTSolution.f90(210): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN OUT) :: RTV
---------^
Common_RTSolution.f90(662): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(954): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(1103): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)              , INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(1293): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)              , INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(1549): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)              , INTENT(IN)     :: RTV    
---------^
Common_RTSolution.f90(1744): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),            INTENT(IN OUT) :: RTV
---------^
Common_RTSolution.f90(1889): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)             , INTENT(IN)  :: RTV
---------^
Common_RTSolution.f90(1892): error #6158: The structure-name is invalid or is missing.
    REAL(fp), DIMENSION(RTV%n_Angles,RTV%n_Angles+1) :: Lff, Lbb
^
Common_RTSolution.f90(2043): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)           , INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(2046): error #6158: The structure-name is invalid or is missing.
    REAL(fp), DIMENSION(RTV%n_Angles,RTV%n_Angles+1) :: Lff, Lbb
^
Common_RTSolution.f90(2135): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type), INTENT(IN OUT) :: RTV
---------^
Common_RTSolution.f90(2183): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type), INTENT(IN)     :: RTV
---------^
Common_RTSolution.f90(2190): error #6158: The structure-name is invalid or is missing.
    REAL(fp) :: Sum_Fac_TL(0:RTV%n_Angles)
-----------------------------^
Common_RTSolution.f90(2318): catastrophic error: Too many errors, exiting
compilation aborted for Common_RTSolution.f90 (code 1)
make[3]: [Common_RTSolution.o] Error 1 (no tiene efecto)
CRTM_RTSolution.f90(38): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define
------^
CRTM_RTSolution.f90(40): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [SOI_MODULE]
  USE SOI_Module
------^
CRTM_RTSolution.f90(41): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [ADA_MODULE]
  USE ADA_Module
------^
CRTM_RTSolution.f90(42): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [EMISSION_MODULE]
  USE Emission_Module
------^
CRTM_RTSolution.f90(24): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [COMMON_RTSOLUTION]
  USE Common_RTSolution       , ONLY: Assign_Common_Input, &
------^
CRTM_RTSolution.f90(208): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN OUT) :: RTV
---------^
CRTM_RTSolution.f90(499): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN)     :: RTV
---------^
CRTM_RTSolution.f90(821): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type),               INTENT(IN)     :: RTV
---------^
CRTM_RTSolution.f90(24): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_INPUT]
  USE Common_RTSolution       , ONLY: Assign_Common_Input, &
--------------------------------------^
CRTM_RTSolution.f90(25): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_OUTPUT]
                                      Assign_Common_Output, &
--------------------------------------^
CRTM_RTSolution.f90(26): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_INPUT_TL]
                                      Assign_Common_Input_TL, &
--------------------------------------^
CRTM_RTSolution.f90(27): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_OUTPUT_TL]
                                      Assign_Common_Output_TL, &
--------------------------------------^
CRTM_RTSolution.f90(28): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_INPUT_AD]
                                      Assign_Common_Input_AD, &
--------------------------------------^
CRTM_RTSolution.f90(29): error #6580: Name in only-list does not exist.   [ASSIGN_COMMON_OUTPUT_AD]
                                      Assign_Common_Output_AD
--------------------------------------^
CRTM_RTSolution.f90(229): error #6404: This name does not have a type, and must have an explicit type.   [RTV]
                                        RTV           )
----------------------------------------^
CRTM_RTSolution.f90(220): error #6404: This name does not have a type, and must have an explicit type.   [ASSIGN_COMMON_INPUT]
    Error_Status = Assign_Common_Input( Atmosphere  , &
-------------------^
CRTM_RTSolution.f90(238): error #6460: This is not a field name that is defined in the encompassing structure.   [VISIBLE_FLAG_TRUE]
    IF( RTV%Visible_Flag_true ) THEN
------------^
CRTM_RTSolution.f90(238): error #6341: A logical data type is required in this context.   [VISIBLE_FLAG_TRUE]
    IF( RTV%Visible_Flag_true ) THEN
------------^
CRTM_RTSolution.f90(253): error #6460: This is not a field name that is defined in the encompassing structure.   [SCATTERING_RT]
    IF( RTV%Scattering_RT ) THEN
------------^
CRTM_RTSolution.f90(253): error #6341: A logical data type is required in this context.   [SCATTERING_RT]
    IF( RTV%Scattering_RT ) THEN
------------^
CRTM_RTSolution.f90(256): error #6460: This is not a field name that is defined in the encompassing structure.   [RT_ALGORITHM_ID]
      SELECT CASE(RTV%RT_Algorithm_Id)
----------------------^
CRTM_RTSolution.f90(256): error #6608: In a CASE statement, the case-expr must be of type INTEGER, CHARACTER, or LOGICAL.   [RT_ALGORITHM_ID]
      SELECT CASE(RTV%RT_Algorithm_Id)
----------------------^
CRTM_RTSolution.f90(257): error #6611: The case-value must be of the same type as the case-expr.   [56]
        CASE (RT_ADA) ;
--------------^
CRTM_RTSolution.f90(264): error #6460: This is not a field name that is defined in the encompassing structure.   [COSMIC_BACKGROUND_RADIANCE]
               RTV%Cosmic_Background_Radiance            , & ! Input, cosmic background radiation
-------------------^
CRTM_RTSolution.f90(269): error #6611: The case-value must be of the same type as the case-expr.   [168]
        CASE (RT_SOI) ;
--------------^
CRTM_RTSolution.f90(291): error #6460: This is not a field name that is defined in the encompassing structure.   [N_ANGLES]
             RTV%n_Angles,                          & ! Input, number of discrete zenith angles
-----------------^
CRTM_RTSolution.f90(292): error #6460: This is not a field name that is defined in the encompassing structure.   [DIFFUSE_SURFACE]
             RTV%Diffuse_Surface,                   & ! Input, surface behavior
-----------------^
CRTM_RTSolution.f90(295): error #6460: This is not a field name that is defined in the encompassing structure.   [PLANCK_ATMOSPHERE]
             RTV%Planck_Atmosphere,                 & ! Input, layer radiances
-----------------^
CRTM_RTSolution.f90(296): error #6460: This is not a field name that is defined in the encompassing structure.   [PLANCK_SURFACE]
             RTV%Planck_Surface,                    & ! Input, surface radiance
-----------------^
CRTM_RTSolution.f90(301): error #6460: This is not a field name that is defined in the encompassing structure.   [SOLAR_IRRADIANCE]
             RTV%Solar_Irradiance,                  & ! Input, Source irradiance at TOA
-----------------^
CRTM_RTSolution.f90(1121): catastrophic error: Too many errors, exiting
compilation aborted for CRTM_RTSolution.f90 (code 1)
make[3]: [CRTM_RTSolution.o] Error 1 (no tiene efecto)
CRTM_Forward_Module.f90(71): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT
------^
CRTM_Forward_Module.f90(72): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_RTSOLUTION]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type    , &
------^
CRTM_Tangent_Linear_Module.f90(78): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
------^
CRTM_Tangent_Linear_Module.f90(81): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_RTSOLUTION]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
------^
CRTM_Tangent_Linear_Module.f90(85): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define,                 ONLY: RTV_type      , &
------^
CRTM_Forward_Module.f90(100): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define,   ONLY: RTV_type      , &
------^
CRTM_Forward_Module.f90(227): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type),        INTENT(IN OUT) :: RTSolution(:,:)   ! L x M
---------^
CRTM_Forward_Module.f90(269): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)        :: RTV  ! RTSolution
---------^
CRTM_Forward_Module.f90(71): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT
----------------------------------------^
CRTM_Forward_Module.f90(72): error #6580: Name in only-list does not exist.   [CRTM_RTSOLUTION_TYPE]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type    , &
----------------------------------------^
CRTM_Forward_Module.f90(73): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_NSTREAMS]
                                        CRTM_Compute_nStreams   , &
----------------------------------------^
CRTM_Forward_Module.f90(74): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION]
                                        CRTM_Compute_RTSolution
----------------------------------------^
CRTM_Forward_Module.f90(100): error #6580: Name in only-list does not exist.   [RTV_TYPE]
  USE RTV_Define,   ONLY: RTV_type      , &
--------------------------^
CRTM_Forward_Module.f90(101): error #6580: Name in only-list does not exist.   [RTV_ASSOCIATED]
                          RTV_Associated, &
--------------------------^
CRTM_Forward_Module.f90(102): error #6580: Name in only-list does not exist.   [RTV_DESTROY]
                          RTV_Destroy   , &
--------------------------^
CRTM_Forward_Module.f90(103): error #6580: Name in only-list does not exist.   [RTV_CREATE]
                          RTV_Create
--------------------------^
CRTM_Forward_Module.f90(287): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION]
    IF ( SIZE(RTSolution,DIM=1) < n_Channels ) THEN
--------------^
CRTM_Forward_Module.f90(287): error #6361: An array-valued argument is required in this context.   [SIZE]
    IF ( SIZE(RTSolution,DIM=1) < n_Channels ) THEN
--------------^
CRTM_Forward_Module.f90(287): error #6283: The DIM specification is out-of-range.   [1]
    IF ( SIZE(RTSolution,DIM=1) < n_Channels ) THEN
-----------------------------^
CRTM_Forward_Module.f90(291): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution,DIM=1), n_Channels
------------------^
CRTM_Forward_Module.f90(291): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution,DIM=1), n_Channels
---------------------------------^
CRTM_Forward_Module.f90(303): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution,DIM=2) /= n_Profiles      ) THEN
--------------^
CRTM_Forward_Module.f90(303): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution,DIM=2) /= n_Profiles      ) THEN
-----------------------------^
CRTM_Forward_Module.f90(488): error #6404: This name does not have a type, and must have an explicit type.   [RTV]
        RTV%aircraft%rt = .TRUE.
--------^
CRTM_Forward_Module.f90(488): error #6460: This is not a field name that is defined in the encompassing structure.   [AIRCRAFT]
        RTV%aircraft%rt = .TRUE.
------------^
CRTM_Forward_Module.f90(488): error #6460: This is not a field name that is defined in the encompassing structure.   [RT]
        RTV%aircraft%rt = .TRUE.
---------------------^
CRTM_Forward_Module.f90(488): error #6303: The assignment operation or the binary expression operation is invalid for the data types of the two operands.
        RTV%aircraft%rt = .TRUE.
--------------------------^
CRTM_Forward_Module.f90(489): error #6460: This is not a field name that is defined in the encompassing structure.   [IDX]
        RTV%aircraft%idx = CRTM_Get_PressureLevelIdx(Atm, Aircraft_Pressure)
---------------------^
CRTM_Forward_Module.f90(500): error #6303: The assignment operation or the binary expression operation is invalid for the data types of the two operands.
        RTV%aircraft%rt = .FALSE.
--------------------------^
CRTM_Forward_Module.f90(573): error #6404: This name does not have a type, and must have an explicit type.   [RTV_ASSOCIATED]
          IF ( .NOT. RTV_Associated(RTV) ) THEN
---------------------^
CRTM_Forward_Module.f90(581): error #6460: This is not a field name that is defined in the encompassing structure.   [RT_ALGORITHM_ID]
          RTV%RT_Algorithm_Id = RT_Algorithm_Id
--------------^
CRTM_Forward_Module.f90(608): error #6458: This name must be the name of a variable with a derived type (structure type).   [RTSOLUTION]
          RTSolution(ln,m)%Sensor_Id        = ChannelInfo(n)%Sensor_Id
----------^
CRTM_Forward_Module.f90(608): error #6303: The assignment operation or the binary expression operation is invalid for the data types of the two operands.   [SENSOR_ID]
          RTSolution(ln,m)%Sensor_Id        = ChannelInfo(n)%Sensor_Id
-------------------------------------------------------------^
CRTM_Forward_Module.f90(866): catastrophic error: Too many errors, exiting
CRTM_Tangent_Linear_Module.f90(272): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution(:,:)    ! L x M
---------^
CRTM_Tangent_Linear_Module.f90(273): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution_TL(:,:) ! L x M
---------^
CRTM_Tangent_Linear_Module.f90(315): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type) :: RTV  ! RTSolution
---------^
CRTM_Tangent_Linear_Module.f90(78): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(79): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET_TL]
                                        CRTM_Compute_SurfaceT_TL
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(81): error #6580: Name in only-list does not exist.   [CRTM_RTSOLUTION_TYPE]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(82): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_NSTREAMS]
                                        CRTM_Compute_nStreams     , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(83): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION]
                                        CRTM_Compute_RTSolution   , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(84): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION_TL]
                                        CRTM_Compute_RTSolution_TL
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(85): error #6580: Name in only-list does not exist.   [RTV_TYPE]
  USE RTV_Define,                 ONLY: RTV_type      , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(86): error #6580: Name in only-list does not exist.   [RTV_ASSOCIATED]
                                        RTV_Associated, &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(87): error #6580: Name in only-list does not exist.   [RTV_DESTROY]
                                        RTV_Destroy   , &
----------------------------------------^
CRTM_Tangent_Linear_Module.f90(88): error #6580: Name in only-list does not exist.   [RTV_CREATE]
                                        RTV_Create
----------------------------------------^
compilation aborted for CRTM_Forward_Module.f90 (code 1)
CRTM_Tangent_Linear_Module.f90(333): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION]
    IF ( SIZE(RTSolution,   DIM=1) < n_Channels .OR. &
--------------^
CRTM_Tangent_Linear_Module.f90(333): error #6361: An array-valued argument is required in this context.   [SIZE]
    IF ( SIZE(RTSolution,   DIM=1) < n_Channels .OR. &
--------------^
CRTM_Tangent_Linear_Module.f90(333): error #6283: The DIM specification is out-of-range.   [1]
    IF ( SIZE(RTSolution,   DIM=1) < n_Channels .OR. &
--------------------------------^
CRTM_Tangent_Linear_Module.f90(334): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION_TL]
         SIZE(RTSolution_TL,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_Tangent_Linear_Module.f90(334): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_TL,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_Tangent_Linear_Module.f90(334): error #6283: The DIM specification is out-of-range.   [1]
         SIZE(RTSolution_TL,DIM=1) < n_Channels      ) THEN
--------------------------------^
CRTM_Tangent_Linear_Module.f90(338): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_TL,DIM=1), n_Channels
------------------^
CRTM_Tangent_Linear_Module.f90(338): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_TL,DIM=1), n_Channels
---------------------------------^
CRTM_Tangent_Linear_Module.f90(338): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_TL,DIM=1), n_Channels
------------------------------------------^
CRTM_Tangent_Linear_Module.f90(338): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_TL,DIM=1), n_Channels
------------------------------------------------------------^
CRTM_Tangent_Linear_Module.f90(352): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution,   DIM=2) /= n_Profiles .OR. &
--------------^
CRTM_Tangent_Linear_Module.f90(352): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution,   DIM=2) /= n_Profiles .OR. &
--------------------------------^
CRTM_Tangent_Linear_Module.f90(353): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_TL,DIM=2) /= n_Profiles      ) THEN
--------------^
CRTM_Tangent_Linear_Module.f90(353): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution_TL,DIM=2) /= n_Profiles      ) THEN
--------------------------------^
CRTM_Tangent_Linear_Module.f90(1016): catastrophic error: Too many errors, exiting
make[3]: [CRTM_Forward_Module.o] Error 1 (no tiene efecto)
compilation aborted for CRTM_Tangent_Linear_Module.f90 (code 1)
make[3]: [CRTM_Tangent_Linear_Module.o] Error 1 (no tiene efecto)
CRTM_K_Matrix_Module.f90(80): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
------^
CRTM_K_Matrix_Module.f90(82): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_RTSOLUTION]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
------^
CRTM_K_Matrix_Module.f90(116): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define,   ONLY: RTV_type      , &
------^
CRTM_Adjoint_Module.f90(80): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_SFCOPTICS]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
------^
CRTM_Adjoint_Module.f90(82): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_RTSOLUTION]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
------^
CRTM_K_Matrix_Module.f90(283): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution_K(:,:) ! L x M
---------^
CRTM_K_Matrix_Module.f90(288): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution(:,:)   ! L x M
---------^
CRTM_K_Matrix_Module.f90(330): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type) :: RTV  ! RTSolution
---------^
CRTM_K_Matrix_Module.f90(80): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
----------------------------------------^
CRTM_K_Matrix_Module.f90(81): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET_AD]
                                        CRTM_Compute_SurfaceT_AD
----------------------------------------^
CRTM_K_Matrix_Module.f90(82): error #6580: Name in only-list does not exist.   [CRTM_RTSOLUTION_TYPE]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
----------------------------------------^
CRTM_K_Matrix_Module.f90(83): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_NSTREAMS]
                                        CRTM_Compute_nStreams     , &
----------------------------------------^
CRTM_K_Matrix_Module.f90(84): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION]
                                        CRTM_Compute_RTSolution   , &
----------------------------------------^
CRTM_K_Matrix_Module.f90(85): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION_AD]
                                        CRTM_Compute_RTSolution_AD
----------------------------------------^
CRTM_K_Matrix_Module.f90(116): error #6580: Name in only-list does not exist.   [RTV_TYPE]
  USE RTV_Define,   ONLY: RTV_type      , &
--------------------------^
CRTM_K_Matrix_Module.f90(117): error #6580: Name in only-list does not exist.   [RTV_ASSOCIATED]
                          RTV_Associated, &
--------------------------^
CRTM_K_Matrix_Module.f90(118): error #6580: Name in only-list does not exist.   [RTV_DESTROY]
                          RTV_Destroy   , &
--------------------------^
CRTM_K_Matrix_Module.f90(119): error #6580: Name in only-list does not exist.   [RTV_CREATE]
                          RTV_Create
--------------------------^
CRTM_K_Matrix_Module.f90(347): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION]
    IF ( SIZE(RTSolution  ,DIM=1) < n_Channels .OR. &
--------------^
CRTM_K_Matrix_Module.f90(347): error #6361: An array-valued argument is required in this context.   [SIZE]
    IF ( SIZE(RTSolution  ,DIM=1) < n_Channels .OR. &
--------------^
CRTM_K_Matrix_Module.f90(347): error #6283: The DIM specification is out-of-range.   [1]
    IF ( SIZE(RTSolution  ,DIM=1) < n_Channels .OR. &
-------------------------------^
CRTM_K_Matrix_Module.f90(350): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION_K]
         SIZE(RTSolution_K,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_K_Matrix_Module.f90(350): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_K,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_K_Matrix_Module.f90(350): error #6283: The DIM specification is out-of-range.   [1]
         SIZE(RTSolution_K,DIM=1) < n_Channels      ) THEN
-------------------------------^
CRTM_K_Matrix_Module.f90(354): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution  ,DIM=1), &
------------------^
CRTM_K_Matrix_Module.f90(354): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution  ,DIM=1), &
-----------------------------------^
CRTM_K_Matrix_Module.f90(357): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution_K,DIM=1), &
------------------^
CRTM_K_Matrix_Module.f90(357): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution_K,DIM=1), &
-----------------------------------^
CRTM_K_Matrix_Module.f90(369): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_K,DIM=2) /= n_Profiles .OR. &
--------------^
CRTM_K_Matrix_Module.f90(369): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution_K,DIM=2) /= n_Profiles .OR. &
-------------------------------^
CRTM_K_Matrix_Module.f90(373): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution  ,DIM=2) /= n_Profiles      ) THEN
--------------^
CRTM_K_Matrix_Module.f90(373): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution  ,DIM=2) /= n_Profiles      ) THEN
-------------------------------^
CRTM_K_Matrix_Module.f90(1226): catastrophic error: Too many errors, exiting
CRTM_Adjoint_Module.f90(116): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [RTV_DEFINE]
  USE RTV_Define,   ONLY: RTV_type      , &
------^
compilation aborted for CRTM_K_Matrix_Module.f90 (code 1)
make[3]: [CRTM_K_Matrix_Module.o] Error 1 (no tiene efecto)
CRTM_Adjoint_Module.f90(282): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution_AD(:,:) ! L x M
---------^
CRTM_Adjoint_Module.f90(287): error #6457: This derived type name has not been declared.   [CRTM_RTSOLUTION_TYPE]
    TYPE(CRTM_RTSolution_type)       , INTENT(IN OUT) :: RTSolution(:,:)    ! L x M
---------^
CRTM_Adjoint_Module.f90(329): error #6457: This derived type name has not been declared.   [RTV_TYPE]
    TYPE(RTV_type)        :: RTV  ! RTSolution
---------^
CRTM_Adjoint_Module.f90(80): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET]
  USE CRTM_SfcOptics,             ONLY: CRTM_Compute_SurfaceT   , &
----------------------------------------^
CRTM_Adjoint_Module.f90(81): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_SURFACET_AD]
                                        CRTM_Compute_SurfaceT_AD
----------------------------------------^
CRTM_Adjoint_Module.f90(82): error #6580: Name in only-list does not exist.   [CRTM_RTSOLUTION_TYPE]
  USE CRTM_RTSolution,            ONLY: CRTM_RTSolution_type      , &
----------------------------------------^
CRTM_Adjoint_Module.f90(83): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_NSTREAMS]
                                        CRTM_Compute_nStreams     , &
----------------------------------------^
CRTM_Adjoint_Module.f90(84): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION]
                                        CRTM_Compute_RTSolution   , &
----------------------------------------^
CRTM_Adjoint_Module.f90(85): error #6580: Name in only-list does not exist.   [CRTM_COMPUTE_RTSOLUTION_AD]
                                        CRTM_Compute_RTSolution_AD
----------------------------------------^
CRTM_Adjoint_Module.f90(116): error #6580: Name in only-list does not exist.   [RTV_TYPE]
  USE RTV_Define,   ONLY: RTV_type      , &
--------------------------^
CRTM_Adjoint_Module.f90(117): error #6580: Name in only-list does not exist.   [RTV_ASSOCIATED]
                          RTV_Associated, &
--------------------------^
CRTM_Adjoint_Module.f90(118): error #6580: Name in only-list does not exist.   [RTV_DESTROY]
                          RTV_Destroy   , &
--------------------------^
CRTM_Adjoint_Module.f90(119): error #6580: Name in only-list does not exist.   [RTV_CREATE]
                          RTV_Create
--------------------------^
CRTM_Adjoint_Module.f90(347): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION]
    IF ( SIZE(RTSolution   ,DIM=1) < n_Channels .OR. &
--------------^
CRTM_Adjoint_Module.f90(347): error #6361: An array-valued argument is required in this context.   [SIZE]
    IF ( SIZE(RTSolution   ,DIM=1) < n_Channels .OR. &
--------------^
CRTM_Adjoint_Module.f90(347): error #6283: The DIM specification is out-of-range.   [1]
    IF ( SIZE(RTSolution   ,DIM=1) < n_Channels .OR. &
--------------------------------^
CRTM_Adjoint_Module.f90(348): error #6404: This name does not have a type, and must have an explicit type.   [RTSOLUTION_AD]
         SIZE(RTSolution_AD,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_Adjoint_Module.f90(348): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_AD,DIM=1) < n_Channels      ) THEN
--------------^
CRTM_Adjoint_Module.f90(348): error #6283: The DIM specification is out-of-range.   [1]
         SIZE(RTSolution_AD,DIM=1) < n_Channels      ) THEN
--------------------------------^
CRTM_Adjoint_Module.f90(352): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_AD,DIM=1), n_Channels
------------------^
CRTM_Adjoint_Module.f90(352): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_AD,DIM=1), n_Channels
---------------------------------^
CRTM_Adjoint_Module.f90(352): error #6361: An array-valued argument is required in this context.   [SIZE]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_AD,DIM=1), n_Channels
------------------------------------------^
CRTM_Adjoint_Module.f90(352): error #6283: The DIM specification is out-of-range.   [1]
             SIZE(RTSolution,DIM=1), SIZE(RTSolution_AD,DIM=1), n_Channels
------------------------------------------------------------^
CRTM_Adjoint_Module.f90(363): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution_AD,DIM=2) /= n_Profiles .OR. &
--------------^
CRTM_Adjoint_Module.f90(363): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution_AD,DIM=2) /= n_Profiles .OR. &
--------------------------------^
CRTM_Adjoint_Module.f90(367): error #6361: An array-valued argument is required in this context.   [SIZE]
         SIZE(RTSolution,   DIM=2) /= n_Profiles      ) THEN
--------------^
CRTM_Adjoint_Module.f90(367): error #6283: The DIM specification is out-of-range.   [2]
         SIZE(RTSolution,   DIM=2) /= n_Profiles      ) THEN
--------------------------------^
CRTM_Adjoint_Module.f90(1206): catastrophic error: Too many errors, exiting
compilation aborted for CRTM_Adjoint_Module.f90 (code 1)
make[3]: [CRTM_Adjoint_Module.o] Error 1 (no tiene efecto)
CRTM_Module.f90(32): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_FORWARD_MODULE]
  USE CRTM_Forward_Module
------^
CRTM_Module.f90(33): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_TANGENT_LINEAR_MODULE]
  USE CRTM_Tangent_Linear_Module
------^
CRTM_Module.f90(34): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_ADJOINT_MODULE]
  USE CRTM_Adjoint_Module
------^
CRTM_Module.f90(35): error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [CRTM_K_MATRIX_MODULE]
  USE CRTM_K_Matrix_Module
------^
compilation aborted for CRTM_Module.f90 (code 1)
make[3]: [CRTM_Module.o] Error 1 (no tiene efecto)
ar: CRTM_SfcOptics.o: No such file or directory
make[3]: [libCRTM.a] Error 1 (no tiene efecto)
endiantest.c(19): warning #180: argument is incompatible with formal parameter
      Order(j);
      ^

endiantest.c(19): warning #180: argument is incompatible with formal parameter
      Order(j);
      ^

 

....

0 Kudos
2 Replies
Javier_M_2
Beginner
839 Views

I answer myself, as you can see on this page:

Http://www2.mmm.ucar.edu/wrf/users/wrfda/yellowstone.html

Simply update to version 15.0.1 or 15.0.3 and solve the problem.

0 Kudos
Kevin_D_Intel
Employee
839 Views

Glad you resolved this. Thank you for posting to resolution.

0 Kudos
Reply