2013年10月3日木曜日

FABM compilation Progress 1

Problem:


fabm_types.F90:1202.??:

   
   subroutine append_string(array,string,exists)
                                                   1
Error: Dummy 'array' at (1) cannot have an initializer

Solution:

I modified "fabm_types.F90" in "fabm-git/src". Reference: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45337#c2

subroutine append_string(array,string,exists)
!HakaseA
!   character(len=attribute_length),dimension(:),_ALLOCATABLE_ :: array _NULL_
   character(len=attribute_length),dimension(:),_ALLOCATABLE_ :: array
!HakaseZ
   character(len=*),intent(in) :: string
   logical,intent(out),optional :: exists
   integer :: i
   character(len=attribute_length),allocatable :: oldarray(:)
!HakaseA
   nullify(array)
!HakaseZ

Problem:

phy.F90:199.18:

   primprod = fnp(self,n,p,par,iopt)
                  1
Error: Type mismatch in argument 'self' at (1); passed CLASS(type_examples_npzd_phy) to TYPE(type_examples_npzd_phy)

Solution:

Not sure... Working on it. Relevant resource: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46990

0 件のコメント:

コメントを投稿