get_field Interface

public interface get_field

Called by

interface~~get_field~~CalledByGraph interface~get_field get_field proc~phyetat0~2 phyetat0 proc~phyetat0~2->interface~get_field proc~dyn1deta0 dyn1deta0 proc~dyn1deta0->interface~get_field proc~sisvatetat0 sisvatetat0 proc~sisvatetat0->interface~get_field proc~phyetat0~3 phyetat0 proc~phyetat0~3->interface~get_field proc~phyetat0 phyetat0 proc~phyetat0->interface~get_field proc~sisvatetat0~2 sisvatetat0 proc~sisvatetat0~2->interface~get_field proc~old_lmdz1d old_lmdz1d proc~old_lmdz1d->proc~dyn1deta0 proc~physiq physiq proc~old_lmdz1d->proc~physiq proc~physiq~3 physiq proc~physiq~3->proc~phyetat0~3 proc~physiqex physiqex proc~physiqex->proc~phyetat0 proc~scm scm proc~scm->proc~dyn1deta0 proc~scm->proc~physiq proc~physiqex~2 physiqex proc~physiqex~2->proc~phyetat0 proc~surf_inlandsis surf_inlandsis proc~surf_inlandsis->proc~sisvatetat0 proc~physiq->proc~phyetat0 proc~physiq->proc~physiqex proc~pbl_surface pbl_surface proc~physiq->proc~pbl_surface proc~physiq~2 physiq proc~physiq~2->proc~phyetat0 proc~physiq~2->proc~physiqex proc~physiq~2->proc~pbl_surface proc~surf_inlandsis~2 surf_inlandsis proc~surf_inlandsis~2->proc~sisvatetat0~2 proc~call_physiq~2 call_physiq proc~call_physiq~2->proc~physiq proc~call_physiq call_physiq proc~call_physiq->proc~physiq proc~surf_landice surf_landice proc~surf_landice->proc~surf_inlandsis proc~surf_landice~2 surf_landice proc~surf_landice~2->proc~surf_inlandsis program~lmdz1d lmdz1d program~lmdz1d->proc~old_lmdz1d program~lmdz1d->proc~scm proc~calfis calfis proc~calfis->proc~call_physiq proc~pbl_surface~2 pbl_surface proc~pbl_surface~2->proc~surf_landice proc~pbl_surface->proc~surf_landice proc~leapfrog leapfrog proc~leapfrog->proc~calfis program~gcm~2 gcm program~gcm~2->proc~leapfrog

Contents


Module Procedures

private subroutine Get_Field_r1(Field_name, Field, found)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: Field_name
real, intent(inout) :: Field(:)
logical, intent(out), optional :: found

private subroutine Get_Field_r2(Field_name, Field, found)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: Field_name
real, intent(inout) :: Field(:,:)
logical, intent(out), optional :: found

private subroutine Get_Field_r3(Field_name, Field, found)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: Field_name
real, intent(inout) :: Field(:,:,:)
logical, intent(out), optional :: found